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***** EDITORIAL ***** 

** TRS-80 MODEL 1 DOOMED IN THE U.S.A. ** 

The F.C.C. has finally pulled the plug on the TRS-80 Model 1 in the U.S.A. Radio Shack will no 
longer be permitted to manufacture the Model 1 for the U.S. market after December 31 this year. 
The reason is that the TRS-80 Model 1 (in common with virtually all other U.S. personal computers 
except the T.I.) exceeds permissible levels of T.V. interference (TVI). The F.C.C. (Federal 
Communications Commission) is the American regulatory body responsible for radio transmissions etc. 
It had already granted Radio Shack a stay of execution but now has set a final deadline. No doubt, 
the new TRS-80 Colour and TRS-80 Model 3 are Radio Shack's answer to the F.C.C. ruling. The Model 
3 in its basic L1/4K form is $200 dearer in the U.S.A. than the Model 1 ($699 compared with S499) 
but Tandy presumably believe that this price will not be a handicap. 

What of Australia? We put the question to a Tandy spokesman and received the following answer. 
The Australian Government has no specific limits on TVI and would only respond to complaints from 
T.V. viewers. So far, these have been negligible. The Model 1, therefore, has an unlimited future 
in Australia. No Australian price is available for the Model 3 which is not due to be released 
here until May or June 1981. 

** MICRO-80 IN THE U.K. ** 

At the time of writing, the first advertisement for MICRO-80 has been on the newstands for about 
two weeks. Already, we have received hundreds of enquiries. The response was a little 
overwhelming and there were a few delays in sending out magazines as our U.K. stocks were exhausted 
before reinforcements could arrive from Australia. We welcome our new readers in the U.K. For 

the moment, our news is mainly about the Tandy scene in Australia and the U.S.A., but we hope we 
will soon be receiving letters from our U.K. readers and are eager to appoint a U.K. correspondent 
to keep us all abreast of happenings there. If you would like to assume that role (for which we 
are prepared to pay) please write directly to us in Australia. 

** LEVEL II ROM REFERENCE MANUAL IN THE U.S.A. ** 

We at MICRO-fiO are pretty proud of Eddy Paay's Level II ROM Reference Manual which we first 
published in May of this year. Not long ago, we sent a copy to one of our U.S. suppliers who had 
expressed interest in it. His verdict, it is the best book of its kind he has read and he has seen 
virtually all of those on sale in the U.S.A. Well done Eddy - there are several hundred happy 
owners of the manual in Australia who heartily endorse that sentiment. Incidentally, Eddy 
continues to uncover useful routines in the Level II ROM. The latest allows you to reset MEMORY 
SIZE during execution of a program. This will be fully explained in the BLINKING CURSOR program he 
has written to be published next month. Finally, we are happy to announce that Eddy has joined 
MICRO-80 as our first full-time staff member. Already, he has cleared MICRO-80 PRODUCTS backlog of 
orders which built up whilst we were at the Melbourne show, and we are now able to offer the 48 
hour turnaround on all in-stock items which has been our aim for so long. 

** TANDY ROAD SHOW ** 

We had heard a number of good things about the Tandy Road Show which has been working its way 
around Australia for several months, now. So, when it came to Adelaide, we made sure we were one 
of the visitors. 

The main show was in a large room which generally does service as a disco. Surrounding the main 
room were three or four smaller rooms with specialist displays such as educational programs, word 
processing, books, software, etc. In the main room there were long tables with chairs and a large 
number of TRS-80" s. We counted 20 and there could have been more divided fairly evenly between 
Model 1 and Model 2 machines each with a line-printer attached whilst the Model 1 machines had a 
single disk drive to bring them ore or less in line with the Model 2 units. Visitors were invited 
to sit at the tables, near the microcomputers (generally there were no more than 2 or 3 people per 
computer). 

The whole show lasted for 45 minutes or so. It started with a film, obviously an American sales 
film but not objectively so. The film explained the background to the development of the 
microcomputer and had a number of users giving testimonials which sounded pretty genuine. After 
the film, visitors were invited to participate in a demonstration routine, using the computers in 
front of them. It was obvious at the session I attended, that very few visitors had any experience 
with microcomputers and were delighted if a little aprehensive, at the opportunity to use them. 
The programs on disk took the users through a number of simple business type routines such as a 
mailing list and some accounting. Instructions were given verbally by a presenter visually on 
slides projected onto a screen, and there was a veritable army of Tandy personnel to assist anyone 
having difficulty. The computer nearest me was a Model 1 and suffered from losing power every time 
someone kicked the labrynth of plugs and sockets on the floor under the table. Willing Tandy staff 
quickly put things to rights although the sequential nature of the demonstration program made it 
difficult for our group to catch up with the rest of the flock. 

After the demonstration in the main room had finished, we were invited to visit the "sideshows" in 
the smaller rooms. I paid brief visits to the word processing demonstration and also the 
educational demonstration. Unfortunately, I did not have as much time to spend in the latter as I 
would have liked. 
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In summary, the Tandy Road Show was well run and organised. There has probably never been its like 
in Australia before and I am sure it gave many people a worthwhile introduction to microcomputing. 
Well done Tandy. 

** TANDY' 5 PRICING POLICY ** 

Last month we were pretty critical of Tandy's pricing policy, at least in the area of the Lower 
Case Mod. Me have had no response to those comments but wonder if a change might be on the way. 
Having the interest in word processing that we do, we had a good look at the new daisy-wheel 
printer being sold by Tandy for $2280. We thought it looked familiar and so it proved to be. It 
is a RICOH printer until recently sold by O.S. Electronics for S33O0. That is an amazing 
turnaround. Usually we expect D.S. Electronics to undersell Tandy by a comfortable margin. 

Just in case that was an accident, we also looked at the new Line Printer VI priced at S1495. It 
is a nice printer and we were not surprised to hear that one Tandy manager left the meeting at 
which the printer was announced shaking his head and muttering that it is $1000 too cheap. Let's 
hope this is just the beginning and that all Tandy's prices will soon follow suit. 

** 8TH INTERNATIONAL COMPUTER CONFERENCE ** 

The 8th International Computer Conference was undoubtedly the greatest collection of computer 
equipment Australian has ever seen. Exhibitors covered the whole gamut from very large to very 
small. MICRO-80 was there, of course, and we were pleased to meet many of our interstate readers 
and many new readers too. We also forged a number of new contacts with suppliers which will be to 
the benefit of all of us over the next few months. 

** ON PRESENTATION OF MICRO-80 ** 

This month we have changed to the new form of presentation which we promised last month. 
Typesetting is being carried out on the Olivetti ET-121 typewriter with MICRO-80 conversion and 
copy is photographically reduced by 80% As a result, we fit more editorial matter into fewer 
pages. This helps us to contain costs and we believe it makes for a more readable magazine. As an 
extra bonus, we have a more interesting cover. John Edwards, one of our readers in Adelaide who is 
studying art, was set a project to design a new cover for a low-budget magazine. He chose 
MICRO-80. John calted with his design on the same day that we were looking for someone to redesign 
our voer! The result you can see for yourself. We hope you like John's efforts and our new 
format. 

** OEAOLINES ** 

Try as we will, we have been unable to keep to our production deadlines, as most readers will be 
aware, we know that this has caused some displeasure and we are doing everything possible to 
correct the situation. The problem is, of course, lack of resources. We have 1200 subscribers at 
present and it is not yet possible to appoint a full-time Editor, although that day is not too far 
away. (If you fancy a job as Editor of MICRO-80 you could write to us in the near future so we 

will have a. list of interest, qualified people to choose from when the time comes). In the 

meantime, we are finally resolved that we will put quality ahead of deadlines and that is why your 
magazine comes later. Have no fears though, it will arrive and every issue will be produced! 

** BM0N AND THE NEW 2 CHIP ROMS ** 

Tandy's new 2 chip ROM's have some "improvements" over their earlier counterparts. One is the use 
of the SHIFT/DOWN ARROW to give a CONTROL function. Unfortunately, access to BMON is via 
SHIFT/DOWN ARROW. Those with the new, 2 chip ROM's will find that they can access BMON by typing 
SHIFT/DOWN ARROW/2 at the same time. This gives the same ASCII code as SHIFT/DOWN ARROW did with 
the earlier ROM's. 

** SUBSCRIPTION RENEWALS ** 

We are nearing the end of our first year of publication and many subscriptions will be due for 
renewal after next month's issue. If your subscription has almost expired, why not send in for a 
renewal now and avoid the risk of missing any issues? 

- 0000000000 - 

***** TIP OF THE MONTH ***** 
For situations requiring password protection to determine access levels. 

Open a disk file, as OPEN, "0",1, "PASSWORD, XYZZY" or any other password you may care to name and 
then CLOSE. 

In your main program, use the following.... 
10 CLS 

20 INPUT"PASSW0R0";DS 
30 0NERR0RG0T070 
40 D$="PASSWORD,"+D$ 
50 0PEN"I",1,DS 
60 GOTO NNNN1 
70 CLS 

80 PRINT"PASSWORD REJECTED" 
90 PRINT"RESTRICTED ACCESS ONLY" 
100 RESUME NNNN2 

NNNN1 CLOSE 

NNNN2 CLOSE 

- 0000000000 - 
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***** 6.T. BASIC - PART THREE of a continuing series - by Peter Hartley. ***** 

Copyright (C) 1980 Peter Graham Hartley. 
All Rights Reserved. 

Before we kick off this month's session, allow me to thank you all for your letters of praise, 

criticism, etc. I cannot emphasize enough just how important these are in ensuring the continuing 

success of this series, which is intended to take the raw beginner by the hand and lead him through 

the normally messy business of mastering BASIC. 

Some of you have asked for a full listing of the Microsoft BASIC commands and functions, together 

with their syntax and appropriate explanations. Microsoft did this in one of their recent 

publications (almost S200!!!) and it would fill no less than 17 complete issues of MICRO-80!!! 

For Level I users, there really isn't any better guide than the Tandy Level 1 handbook, which is 

also sold as a separate publication under the title "BASIC Computer Language - it's easier than you 

think." 

For Level II and System 80 users. Learning Level II, by Oavid Lien (who also authored the Level 

manual) is highly recommended. If you use both these books together, you will find that the Level 

II book has a whole heap of pages for cutting out and pasting into the Level I book - and this 

makes a great deal of sense. 

I'm not prepared to compare the Tandy/System 80 versions of BASIC with other brands, except to say 

that I am still unable to find better. I find the Model II to be somewhat inflexible, by 

comparison with the System 80/TRS-80 Model I, and the soon-to-be-released Model III is alleged to 

be compatible with Model I, but I'll know more about that before the November Edition (hint!!!). 

Now to business. . . 

Last month I threw you all in at the deep end with the FOR/NEXT loop, showed you how to tidy up 
your PRINT statements, and just introduced the DATA STATEMENT with this little program. 

10 POKE 16553,255 (Level I users leave this line out.) 

20 DATA 1, 3, 5, 7, 9, 2, 6, 8, 10 

30 CLS 

40 PRINT "ODD NUMBERS BETWEEN 1 AND 10 ARE "; 

50 FOR K=l TO 5 

60 REA0A 

70 PRINTA; 

80 NEXT (Level I users use N.K ) 

90 PRINT "EVEN NUMBERS ARE »; 

100 F0RK=1 TO 5 

110 READA 

120 PRINTA; 

130 NEXT (Level I users use N.K ) 

140 END 

Those of you who tried this will have discovered that it didn't look quite as tidy as we would have 
liked - running the entire output into one continuous sentence. 
To tidy it up, now add two new lines. 

85 PRINT "." 
and 

135 PRINT "." 

** 8efore any of the old lags in the back row start putting pen to paper to send in their 
complaining letters - "YES, I KNOW that there are 27 better ways to do this, without using DATA 
statements, but I'm teaching about DATA statements, so save your stamps for later." 

Now we'll take it to pieces... 

Line 10 is a DATA statement debugger, explained in September. 

20 is a OATA statement - a list of DATA to be used by the program. 

30 Make with the eraser... 

40 PRINT exactly what is in between the quotes, and leave the cursor at the end - more 
to come. 

(See September) Do the next bit 5 times. 
READ the next item of data, and store it in variable A. 

70 PRINT what's stored in variable A 

80 (See September) Back to 50. 

85 PRINT it and start a new line (No comma, semicolon or other PRINT MODIFIERS). 

90 These lines have the same 

to effect as lines 50 through 

135 85 so carry on as before.. 

140 Finished with engines... 

Because this little routine is so annoyingly inefficient, this would seem as good a time as any to 
introduce the concept of SUBROUTINES. 
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As every instruction line has a number, and because the well-trained '80 is obedient and 
long-suffering, we do not have to waste either our time, or the computer's valuable memory space, 
writing out identical statements over and over. In the example above, for instance, lines 50 to 85 
are doing exactly the same jobs as lines 90 to 135. To save space and effort, then, we need to 
understand the instructions... 

GOTO GOSUB and RETURN 

Without typing NEW (Because we are going to come back to the last program in a moment) type in the 
following muddle, ending each line with (ENTER) or (NEW LINE). 



200 
210 


CLS 


GOTO 260 


220 


GOSUB 320 


225 


G0SU8 320 


230 


GOTO 280 


240 


PRINT "E"; 


250 


GOTO 220 


260 


PRINT "H"; 


270 


GOTO 240 


280 


PRINT "0" 


290 


END 


300 


PRINT "YOUR COMPUTER IS R/S." 


310 


PRINT "TAKE IT BACK AND SPOIL SOMEONE'S DAY. 


315 


GOTO 300 


320 


PRINT "L"; 


330 


RETURN 



Now type RUN 200 and press (ENTER) or (NEW LINE) (Another surprise... you can have more than one 
program in memory at one time, just tell ol ' '80 where to start...) 

If you didn't make any mistakes with your typing, the screen should read 

HELLO 

READY 
L 

If you follow the listing through, you'll see that the computer jumped about quite a bit, and 
visited the SUBROUTINE starting at 320 twice. When the computer encounters a GOTO, it jumps to the 
new location and continues as if nothing had happened. When it encounters a GOSUB it makes a note 
of where it is prior to the jump. Then it jumps and carries on there until it encounters a RETURN. 
This makes it look up the previously noted address, and it jumps back TO THE FIRST STATEMENT or 
INSTRUCTION FOLLOWING THE GOSUB. 



** ALWAYS end a SUBROUTINE with RETURN 



• f 



##### mama ########## ########## mm*m ##### 

##### G.T. BASIC RULE #3 ##### 

##### IF YOU NEED TO EXECUTE THE SAME SERIES OF HffU 
###*# INSTRUCTIONS FROM MORE THAN ONE PLACE IN *#•## 
##### YOUR PROGRAM - ** ALWAYS USE A SUBROUTINE ##### 
MM* timmti IMMM ########## ########## ##### 

**•* One of the three known bugs in MICROSOFT '80 type 8ASIC relates to the use of subroutines. As 
this particular bug only rears its ugly head within the most convoluted of programs (with multiple 
nested - inside one another - SUBROUTINES and FOR/NEXT LOOPS) we'll not need to worry about that 
for quite a few months. 

Now, we already know that to clear an entire computer-full of program we use the command NEW. We 
also know that to delete a single line we have only to type in the line number and hit (ENTER) or 
(NEW LINE). Now try... 

DELETE 200-330 
(ENTER) or (NEW LINE) 
LIST 
(ENTER) etc 

Now let's make the remaining program a bit more efficient... Type in the following, aoain endinq 
each line with (ENTER) or (NEW LINE). 
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50 GOSUB 100 

60 PRINT "." 

70 PRINT "EVEN NUMBERS ARE "; 

80 GOSUB 100 

90 END 
135 (This is simply to delete the old line 135) 

140 RETURN 

RUN (ENTER) 

O.K? 

* STRING VARIABLES 

In the first of these sessions I explained just how many NUMERIC VARIABLES there were in both Level 
I and Level II. Now its time to learn about STRING VARIABLES. These are used to store STRINGS. 
You'll recall from last month's piece that a STRING is something to be printed - not something upon 
which mathematical miracles are to be performed. So while the number 123 would normally be stored 
in a NUMERIC VARIABLE, "123 Goodwood Road" could only be stored in a STRING VARIABLE. Note, 
though, that you could still store "123" in a STRING VARIABLE, but you could not perform any math 
on it without doing a few other things to it first - and we'll discuss these sometime in the 

future. 

Level I has only 2 STRING VARIABLES - called A$ and B$, and each of these can store a string of up 

to 16 characters and spaces. 

Level II has over 950 STRING VARIABLES - A$ through to Z$, and then AAS through to AZS, to AOS and 
on to A9$, then to BA$ and on and on and on until you eventually get to Z9$. STRING VARIABLES in 
Level II can hold up to 255 characters and spaces, but for practical purposes we should try to 

limit ourselves to 248 characters. 

The '80 normally knows that you are referring to a STRING VARIABLE only by the $ symbol in its name 

- again, more on this aspect later. 

So, now let's make a few more changes to our ever-changing progam... again, remember to hit (ENTER) 
or (NEW LINE) after each line... 

15 AS="0DD NUMBERS " 
17 B$="EVEN NUMBERS ■ 
40 PRINT A$; 
70 PRINT B$; 
RUN 

O.K? 

Nearly finished for this month - just a few more changes... 

15 

17 

20 DATA ODD NUMBERS ,1 ,3, 5, 7, 9, EVEN NUMBERS ,2,4,6,8,10 

40 

70 

100 FOR K=l TO 6 
110 READ A$ 
120 PRINT AS; 
RUN (ENTER) etc. 

The lines with nothing except for the line number are just to delete the old lines. What we've 
done is to get the computer to treat all the DATA as STRINGS, by using AS instead of plain old A in 
lines 110 and 120. 

Now we really are in the home stretch 

90 GOTO 50 
RUN (ENTER) etc. 

Level I produced HOW? 

Level II produced a mysterious message... 0/D ERROR IN 110???? 

What happened was that there just wasn't any more DATA to read. One solution is to add more DATA 
to line 20, however, try... 

90 RESTORE: GOTO 50 
RUN (ENTER) etc. 

The RESTORE statement makes the computer reset its internal records so that it thinks it hasn't 
read any DATA at all, yet. 

- Continued on page 14. 
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MEMORY SIZE? by E. R. Paay 

RADIO SHACK LEVEL II BASIC 
REAOY 
)PRINT HEM 
9452 

You have just plugged in your 16K expansion kit to convert your 4K machine to 16K. Eagerly, you 
switch the machine on, the familiar MEMORY SIZE? question pops up. You type ENTER and wait for the 
machine to reply with RADIO SHACK etc. Now you type PRINT MEM and instead of 15572 coming up it 
says 9452. However if the MEMORY SIZE? question is answered with, 32000, for example, everything 
appears to be okay. Does this sound familiar ? It must do to some because several people have 
written in to us relaying similar problems after installing their 16K RAM's. One reader rang the 
dealer from which he bought the chips and was told that this occasionally happens with TRS-80's, 
and not to worry about it. This is, of course, a load of rubbish. 

Provided the dip shunts are programmed properly, then the wrong answer to PRINT MEM means that one 
of the RAM's is faulty. Let us once and for all clear this matter up so that everyone knows why 
this happens. 

The computer during initialization checks how much memory is available to the system. Knowing the 
algorithm it uses to determine this will reveal how the above problem arises. Depending on the 
answer given to the MEMORY SIZE ? question, the computer will do one of two things : 

1. If MEMORY SIZE ? is answered with ENTER, the computer will start checking memory from about 
434DH. It takes a byte from memory and stores it in a register for safe keeping, it then places a 
value in this location and reads it back. If the value read back is the same as the value placed 
in that location then it will RESTORE the original value and moves on to the next byte. This 
continues until a memory location turns up that returns a different value than that written into 
it. The computer assumes that this is the highest memory location available and sets the memory 
size accordingly. 

2. When the MEMORY SIZE ? question is answered with a value, all that the computer does is test 
that one location to see if it actually exists. 

This means that if you have a bit 1n one of the RAM's which is faulty, the computer will use this 
as the memory size value. It only takes one bit in one location in memory to be faulty for this to 
happen. However if a memory size value is specified by the user then this bad memory location will 
not be recognised and the computer will set the memory size as requested, providing that the 
address specified exists. So if this happens to you after installing a new ram kit. Insist on 
replacement RAM's, don't let any one tell you not to worry about it! (MICRO-80 PRODUCTS points out 
that they have never had this problem with any of their RAM chips because they sell only PRIME 
spec. 200 nanosecond chips - Ed.) 

- 0000000000 - 

!!!!! HELP !!!!! From the new Software Editor - Charlie 8artlett 
It's all our fault, but the magazine has grown so quickly that some things have got out of hand. 
First the good news, EVERY contributer who ever submitted software for publication has now had an 
individual file opened containing information such as name, address and phone number (where 
supplied), the programs he has sent in, whether they were accepted or rejected and whether he has 
been paid, etc ect.. In fact everything related to that contributor. This information is also 
stored 1n a computer information storage system enabling information about a contributor to be 
found in seconds. 
NOW THE BAD NEWS 

Now that the files are sorted out, I find that, in some cases, the information I have is 
incomplete. Somewhere along the line some letters, tapes and forms have been lost. If you sent 
us software more than six weeks ago and have not recieved a response or if we have not sent your 
tape back, please write to me c/o MICRO-80, P.O. BOX 213, GOODWOOD, SA 5034. 

May also ask that if your writ ing is not very clear will you PLEASE - PI FASF - rew .«*fc. 

several USJhH * Uttmnt * or P rint b * ha " d *lSarlJ but best of U se typewr er ' 2 

STICK WITH US GANG, WE ARE TRYING TO GET THE BUGS OUT 



- 0000000000 - 
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** 8ETTER BYTES ** A potpourrle of bits of this and bits of that.. 

Conducted by Peter Hartley. 

#/*## Readers comments, hints, suggestions, etc., are requested for this column. 

* MICROSOFT BASIC COMPILER 

As previously reported, the Microsoft Basic Compiler for the TRS-80 Model 1 has been withdrawn, 
rewritten, and some 30 odd copies of the Mark II version are currently out on test. However, some 
of our readers have copies of the original version, and are experiencing some problems. 
The solutions are always to be found in the manual, but often buried away, so here are a few tips. 

If you have two drives and can use a 40 track drive for Drive 1, do so. You can get all three 
parts of the Compiler (BASCOM/CMD, L80/CMD and BASLI8/REL) onto the one 40 track diskette, and then 
use the Compiler as though it is on a 3 drive system. Use a minimum system diskette in Drive 0, 
with just the .../SYS and BASIC/CMD files on it, together with your BASIC program that is to be 
compiled, as an ASCII file. 

The Compiler doesn't see a downward line feed in the middle of a line - not even inside quotations! 
So, use separate PRINT statements. 

The Compiler treats STOP and END both as END - and sometimes ENDs when it gets there. So put them 
AT THE END! 

The Compiler will only process lines of up to 12? characters. The simplest way to run it is with 
separate statement lines. 

If your BASIC program contains ... NNN INPUT"PRESS (ENTER) TO C0NTINU£";0S you will have problems - 
responding to an INPUT with an (ENTER) generates a null string, which will be rejected by the 
compiled software, generating a "REDO FROH 8EGINNING" message. So, use a 

DS=INKEYS:IFDS=""THENnnnELSE... statement. 

If you either don't use any switches when you compile, or if you use the -4 switch, the use of any 
blanks around reserved words may create syntax errors. Equally, using the -5 switch will generate 
errors if these blanks are NOT there! 

Using the -S switch will produce more efficient code, by forcing all strings to be stored at the 
front of the generated software. 

As the compiler does understand WHILE... WEND and SWAP, you may as well use them for efficiency. 

* ON EARTHING YOUR SYSTEM * 

The Hartley system recently started showing some rather unusual symptoms - massive increase in 

spontaneous re-booting, slight increase in the notorious TRS-80 video shimmer in the upper left of 

the display, A.C. type tingles from the Disk Drives when also touching a good earth point - and the 

oddest symptom of all (and the first I noticed) - a 100 cycle hum coming right across the top of 

one of our local radio stations on about 970 KHz. 

A little investigating showed that the hum was being picked up from all the house mains wiring, and 

that it stopped when the Video Display was switched off or disconnected from the C.P.U. 

Earthing the Disk Drives (Pertec) cured the A.C. tingles, but nothing else, so I started with the 

multi-meter and discovered about 26 volts A.C. with respect to earth coming from the Video Display 

Cable. Discussions with one of the local experts suggested that using a high-impedence FET type 

meter would show that the 26 volts was really 240 volt mains!. 

Fortunately I had a copy of the official manual for the VDU (one of the original "square" types 

which use an auto-transformer to drop 240 volts down to 110 volts a la U.S.A. style). This unit 

has a small board designed to produce total electrical isolation between the CPU and the VDU. The 

board draws a 5 volt supply from the CPU, and has its own earth, quite separate from the floating 

earth of the VDU. The two systems are interfaced through an opto-isolator chip. 

The reason for the isolation technique used is that the main T.V. circuit used (a) does not have an 

earthed chassis and (b) can demonstrate a live chassis. 

Joining the two earths is a sizeable capacitor. The purpose of this appears to be to maintain a 

stable relationship between the RELATIVE levels of the two earths, with the aim of producing a more 

stable video picture. 

Removing this capacitor cured all the problems except the video stability - which got a great deal 

worse. 

Replacing it with a new one of the same value left the symptoms exactly as before. 

Examining the circuit of both the VOU and the CPU showed that the VDU earth (computer side) was 

common with the CPU earth. Rather than hunt around for a new opto-isolator (the one used is 

somewhat rare!) I finally settled for using the mains earth within the VDU. This terminates by 

soldered joint on a massive tag-strip deep in the bowels of the VDU. Running a heavy and 

well -insulated cable from the earth tag to the computer-earth on the video-isolation board proved 

the perfect simple fix and earths the entire system. Result - only one spontaneous reboot in the 

last six weeks (from a system that is up and running some eighteen hours a day!), stable video, no 

more hum from the radio and a total loss of the A.C. tingles. 

Be warned though - the design of the old VOU demands that you do not go poking around inside unless 

it is unplugged from the mains. Also be careful of the large capacitors and the tube which can 

carry a sizeable charge for a surprisingly long time. 

- 0000000000 - 



ISSUE 11 (OCTOBER 1980) MICRO-80 PAGE 9 

** PROBLEM CORNER ** 

Q. Can you show me a simple way to use a Disk based Menu? 

A. Sure. 

First file your programs with simple, alphabetical file-names and forget about using 
extensions. Eg.: A, B, C, etc.. 
Now, set your menu program up like this:- 

10 CLS 

20 PRINT" MENU 



30 PRINT" 

A) RING BELLS 

B) BLOW TRUMPETS 

C) FLASH LIGHTS 
0) FLY A KITE 

40 PRINT"SELECT OPTION ■; 
50 D$*INKEY$ 
60 IFD$ ( "A"0RD$ ) "D"G0T050 
70 RUNDS 

Now, if one of your secondary programs is also a menu, you set it up the same way, options being 
single, key letters, starting from A. Give this and similar sub-programs two-letter names, eg.:- 
CA, CB, CD, CE, CF etc. 

In this case, LINE 70 becomes:- 

70 D$="C"*D$: RUNDS 

0. I need a simple method off saving a screen-full of data to disk 

A. O.K. 

Method I 
10 CLS:0PEN"O",l, "SCREEN" 
20 D$=INKEY$ 
30 IFD$**"'G0T020 
40 IFDS()"@"THEN PRINTDS; :G0T020 
50 M= 15360 
60 FOR K=-l TO 8 
70 OS*"" 

80 FOR L=M TO M*127 
90 0S=DS*CHR$(PEEK(L)) 
100 NEXT 
110 PRINT* 1,0$ 
120 M=L 
130 NEXT 
140 CLOSE 

And to get it back, just open the file and:- 
FOR K=l TO 8:INPUT*1,D$:PRINTD$;:NEXT 

METHOD 2 {for NEWDQ5+) 
Protect some high memory; format from DOS is BASIC 1,32767 
10 CLS 
20 D$=INKEY$ 
30 IFD$=""G0T0 20 
40 IFD$()"P"THEN PRINTDS; :G0T020 
50 M=&H3C00 
60 C=SH8000 
70 FOR K=0 TO &H400 
80 POKE C*K,PEEK<M+K) 
90 NEXT 

100 CMD"0UMP SCREEN/CIM tSTART=X'8000' ,END=X'8400) 
110 END 

And to recover it later, use:- 

10 CLS 

20 CMD"L0AD SCREEN/CIM" 

30 M=SH3C00 

40 C=&H8000 

50 FOR K=0 TO 8H400 

60 P0KEM*K,PEEK(C*K) 

70 NEXT 

80 END 

Neither of these programs is all that fast - a ml . routine woould be much faster - something for 
someone out there to develop. 

- 0000000000 - 
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COMPUTERISED RTTY - "MACROTRONICS AND THE SYSTEM 80" - by Ron Collins VK5RY 

{Many of our readers are Amateur Radio Operators and we have had a number of requests for articles 
of particular interest to "Hams". We hope this article by Ron Collins will go some way towards 
satisfying those requests. In the meantime, if you have some experience in this field, why not 

write an article for us? - Ed.) 

Let me begin by pointing out that I am not an "expert" on RTTY, or anything else for that matter. 
This article is to let others know of my observations with regard to the Dick Smith System 80 
computer, being coupled with the Macrotronics M80 for RTTY operation. 

I have been involved with RTTY for about seven years; my main Interest being DX and Contest 
operating. Just recently it has become apparent that a lot of stations in the United States and 

Europe are using equipment that 1s obviously computer controlled. When asked what their equipment 
Is, a large number answer, "such and such a micro-computer" with an "M800 RTTY interface". Having 
toyed with the idea of applying the same idea here, I Investigated the cost of various computers 
but found them mostly to be cost-prohibitive. Then, lo and behold, the System 80 was released, and 
put micro-computing within my grasp. I purchased one and played with same for a few weeks, having 
great fun in Basic. Now, I thought, the time was ripe to sound out the possibilities of RTTY and 
proceeded to write to the owner of "Macrotronics" in the States, giving him the pinout of the 
SYSTEM 80, to see if it was compatible with the Tandy-80 version of the M800. His reply was, "if 
it is the same as the TRS-80 it will work". According to the information that I had to hand about 
the SYSTEM 80 (TRS-80 compatible?), there should have been no reason why the Macrotronics gear 
would not work, so I ordered an M80, (the heart of the M800 system, which consists of a very nice 
P.C.B. and the software to get on RTTY, also a very comprehensive booklet). The price in Australia 
is a bit of a con, $180 odd, but if the price of a unit ordered from U.S.A. plus the import duty 
etc. is taken into consideration, I suppose that 1t 1s not too bad. 
Now comes the "CRUNCH". 

Looking at the connections between the TRS-80 and the M80, the requirements are:- 
4 address connections (0-3), 4 data connections (0-3), a Ground and a "funny" called "Not IN". 

I .supposed that a "Not IN" would be an "OUT" but there was not an output on the SYSTEM 80 called 
either of these names. Checking with the TRS-80 service manual, readily available, I found that 
the missing signal was, in fact, a combination of "Not I0RQ" and "Not I0RQ", being Read bar and 
IN/OU T Request Bar, the two being combined in a gate to give a resultant "Not IN" at Tne ouTput. 
Checking the SYSTEM 80 circuit diagram, 1t was found that this signal is available and is used 
internally for another function but 1s not brought out to a pin on the connector. Therefore, it is 
only a matter of joining pin 6 of I.C.15 (74LS32), (see Fig.l), to unused Pin 32 on top of the edge 
connector with about two inches of hook-up wire, and we now have the necessary "NOT IN" function. 
Having connected up the address, data and NOT IN connections, along with a Ground and 9 volts A.C., 
we can get the "THING" up and running. Load the program from the cassette supplied, taking note of 
the loading instructions, and we find that we need to type in an instruction called "MEMORY SIZE". 

"MEMORY SIZE"?, what's that? we say; What I did not know at that time, was that the "READY" that 

comes on the screen when the SYSTEM 80 is first switched on, 1s in fact a request from the computer 

to tell it what the memory size is going to be. 

Now we can really get going! 

Switch off SYSTEM 80, switch on again after 15 seconds, up comes READY?, type in 30000 (as per the 

instructions in the booklet), press NEW LINE and the READY pops down to the bottom. 

Type SYSTEM, it answers with a *?; type M80, press the cassette "play" button and then the "NEW 

LINE" key and the cassette begins to load with the flashing asterisk. 

The first load is 1n machine language, so when it 1s loaded, an ■*?■ will appear. 

Press the "Break" key, then type the CLOAD command and the cassette will begin to load the BASIC 

part of the program. The normal "Ready?" will show that the program 1s in the memory O.K., so we 

can now "RUN" the program. 

At first, there is displayed the name of the program and the author then the screen is blanked and 
we really get into the "Nitty-Gritty". The screen tells you what to do and when to do it 
(referring frequently to the handbook) and we are amazed. However, we find that to get out of one 
mode and into another, we need to have a function called a "CLEAR". What 1s a "CLEAR"? you might 
well ask because you will find that the SYSTEM 80 ain't got one, no matter how hard you try all the 
other keys. Not to despair; check the System 80 circuit and we find that it has the same keyboard 
matrix as the TRS-80 but some of the keys have been omitted from the System 80 keyboard for some 
crazy reason; (also, you will find that another function is required, that is the "forward arrow" 
function to alter some of the mode activities of the program). 

So now we look at the keyboard; all that room with holes and all, to fit more keyswltches but just 
you try and find some that will go in those holes and leave room for connections. For the "CLEAR" 
key, I made use of the right hand "SHIFT" key, just by cutting the print and connecting to the 
right points on the print by following the matrix connections on the underside of the P.C.B. MA! 
you will say, that's easy but I'll bet that you did not know that although the numbering on the 
connections says "1 to 20" or at least, "1 to 10", it is in fact, the other way around; so don't 
forget to number from the other end (pin 1 1s in fact pin 20). If you were dumb enough to flop the 
keyboard over from right to left (as I was), to get to the underside of the P.C.B., you will now be 
aware of the fact that all of the wires that were plugged into the connector on the top of the 
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boards, have now fallen out. Just you try to get them all back in in a hurry; the trick is to flop 
the P.C.B. over from front over to the back and they will hopefully stay in place. 

Whilst we are looking at the bottom of the P.C.B. , how about looking at the rest of the unused 

lines. 

Apart from the "CLEAR", there are six other function keys that may as well be used (see Fig. 2). A 

few "low profile" keyswitches were obtained locally and these were mounted on a piece of fibreglass 

(and another piece underneath that for insulation), this assembly being mounted as a next row up 

from the existing top row but this, of course, is up to the individual. Now we can really get 

going: connect up the TS820 and the 0T600, follow the "MENU" and get the gear on the air. 

What?, no receive of RTTY characters?. 

Upon checking with a logic probe, it was found that the EX/OR gates in I.C9 on the H80 board were 

not switching, even with 0-5v transitions on the input (H) and (7), (RS232 in). Changing the OPTO 

load resistor to 500 ohms from IK cured this problem and signals were bunging characters onto the 

T.v. screen but it is all "gibberish". What's up now?, of course, looking at the "MENU" we find 

that if we press the '/' key, the Mark and Space will be inverted. Hey Presto; it works; but the 

QSO is in Italian; it seems that we can't win! 

I have yet to try the "THING" on C.W. but messing about with the keyboard in the C.W. mode makes 
transmitting a breeze and the buffer makes typing ahead very easy, so that your fist sounds like a 
truly professional operator and the bug is getting to me that makes me want to go "Brass-bound" 
again. For further information on the System 80, there are some "News Letters" (numbers 12 and 17) 
available from Dick Smith shops for free. 

Having seen the M800 in operation here, I have placed one on order and if I can work out all the 

things that are available on it, I might get the DXCC on RTTY yet. 

One other thing comes to mind; as all my RTTY is at TTL levels, I found that the print from Pin 1 

of the relay (GROUND) had to be cut and the Pin 1 connected to 5 volts to give me the +5 necessary 

for the correct switching sense. 

Best wishes and good RTTY/Computer operating. 

PS. In the Keyboard Matrix, (Fig. 2), note the extra characters. 

Lines:- 3-16 Left Square Bracket 

1-16 Back Slash 

5-16 Right Square Bracket 

2-16 Inverted Vee 

4-16 Underline 

8-19 Clear 

2-19 Advance Arrow (Actually "Tab 16 Characters"). 

Line 20 to any other line only duplicates other characters, so is of no use. 

** EDGE CONNECTOR PIN CONNECTIONS ** 

TRS-80 SYSTEM-80 

1-2-49-50 
10 



GNO 


37-8-29 


A0 


25 


Al 


27 


A2 


40 


A3 


34 


!N(8ar) 


19 


DO 


30 


Dl 


22 


D2 


32 


D3 


26 



I 



8 
32 (After modification Fig 1) 
15 
14 



B 



21 39 2 22 32 50 



22 40 1 21 49 

Edge connectors from rear 
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****** TAPE & DISK DATA FORMATS ****** 
by: E. R. PAAY. 

This section discusses how the computer stores programs on tape or disk. For cassette I/O, port 
255 is used. This port is used for several functions such as character display format and turning 
the cassette recorder on and off. For this discusion however we are only concerned with bits and 
1. These bits can cause the cassette port to output either a zero, positive or negative voltage. 
Each pulse that is written to tape consists of a negative and positive voltage transition. On 
tape, we have a leader of 256 zero bytes followed by the actual program. Data is saved on tape 
serially with clock bits interlaced with data. For each bit of a byte, a clock pulse is written 
first then, depending whether the data bit is 1 or 0, a bit will or will not be written to tape, 
folowed by the last clock pulse (i.e. no data pulse for a bit 0). 

The read routine in ROM used by CLOAO and SYSTEM uses the following procedure to load a byte from 
tape : 

1. Loop until a clock bit is found. 

2. Delay 2 mS. 

3. Scan cassette port to see if bit is 1 tpulse 
present). 

4. Shift bit into register. 

5. Do a short delay to give data pulse time to decay. 

6. Repeat sequence until 8 bits have been read. 



present) or (no pulse 



From this we can conclude that if there happens to be a noise spike on the tape before a valid 
clock pulse the computer will lose its place and read in a "bad" bit. If the clock pulse however 
becomes stretched far enough so that it is still there after the 2 mS delay the computer will read 
this as a I and cause a bad bit to be shifted into the byte it is working on. If it hasn't become 
obvious yet, the clock bit is necessary to keep the computer synchronised to the tape while reading 
is in progress. For example if a tape is created on one tape recorder and read on another and the 
two recorders have a slight difference in tape speed, the computer can still read the tape as it 
will be able to catch up every time it looks for the clock bit. If the clock bits were not there 
and all data bits were dumped with 2mS delays between them, the computer would very quickly loose 
sync. If the tape was replayed on a faster recorder causing the gaps between bits to shorten to, 
for example 1.99mS, after 100 bits the computer would be out by ImS, whereas with clock bits the 
computer would be out by a constant amount of O.OlmS for each bit. The values given are of course 
only an example and don't necessarily relate to real values. I might point out at this stage that 
the new TRS-80's have a modified ROM in them which overcomes the first problem mentioned by 
Introducing a greater delay after scanning the cassette port for a data bit etc. System 80 users 
are stuck with the old version of the level II interpreter which is part of their cassette 
problems. 

Data is handled in much the same manner on disk, the recording technique is different however. The 
recording technique used is a constant amplitude signal which is frequency modulated, people who 
understand B H curves and magnetic flux will recognise the advantage of this technique. The 
stringy floppy device uses this technique also and users will know how reliable they are. 

There are two different types of formats for tape:- BASIC CSAVEd tapes and SYSTEM compatible tapes, 
they have the following formats :- 

** BASIC PROGRAM FORMAT ** 

1. 256 byte leader consisting of zeros. 

2. A5H sync byte. 

3. BASIC header consisting of three bytes D3H. 

4. Program name consisting of one character. 

5. A two byte long line pointer which points to the start of the next BASIC program line. 

6. BASIC line number in hexadecimal. 

7. Actual program line up to 240 bytes long. 

8. Zero byte to signal end of line. 

9. New line starts here OR two zero bytes to mark end of program. 

** FORMAT OF SYSTEM TAPE ** 

1. LEADER as for BASIC program. 

2. Sync byte A5H. 
Header code 55H. 

Name six characters long padded with blanks if less than six characters long. 
Note that the SYSTEM command only checks the first character of the name, the last 
five characters are never checked. That had me fooled for a while, too. 
Block header code C3H. 
Block length from 1 to 256 bytes long. 
Two byte starting location of block in memory. 
Block of data stored here. 

One byte checksum which is the total of the starting address and all data added 
together, ignoring any overflow. 

The block from item 5 on is repeated here for the next block OR a 
one byte END of program code 78H is stored here. 



3. 

4. 



5. 
6. 
7. 
8. 
9. 

10. 
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** 8ASIC PROGRAMS STORED ON DISK ** 
1. Basic header code FFH. 

The rest is exactly the same as for tape starting with the line 

pointer. 

- 0000000000 - 



***** READERS' REQUESTS ***** 

This column is a regular feature of MICRO-80. In it, we list all those articles, programs, etc. 
requested by our readers. We try to work our way through the list as time permits, but if you 
would like to contribute an article or program, look here for an idea of our readers preferences. 

** ARTICLES ** 

File handling on the '80 

Description of the functions performed by the Expansion Interface 

Reviews of '80 compatible printers 

Reviews of commercially available software (including that produced by us!) 

Reviews of commercially available hardware 

How to SAVE onto Disk, programs such as Analogue clock and Touchtype 

A master index to the appropriate sections in the Tandy Manuals in Level I, Level II, DOS etc. 

** SOFTWARE'** 

GAME OF LIFE relocated to start at 700OH 

A m.l. program to enable the break key to work like RESET when using an expansion interface 

Stock market program 

Horse racing system 

"Files" program modified for 48K system 

Morse code decoder 

Sub-routine Forum 

Program to "SET" non-graphical symbols 

** HARDWARE ** 

RS232 printer interface 

Interfacing the '80 to external hardware 

Review on the performance of line filters 

How to convert a black and white T.V. to a monitor 

Review of high resolution graphics mods. 

Real Time clock 

Radio Teletype/Morse interfacing 

RFI (Radio Frequency Interference) suppression 

- 0000000000 - 



** LNW RESEARCH EXPANSION INTERFACE BOARDS ** 
$79.95*$2.00 p&p 

There has been so much interest shown in the LNW Research expansion project described in last 
month's MICRO-80 that we have decided to import the boards to Australia. These boards are the 
basis for a high quality, reliable expansion interface for the TRS-80 (or the SYSTEM 80 via our 
SYSPAND-80 adaptor). Initially, we will offer the boards with their comprehensive construction 
manual. As soon as possible thereafter, we will offer modular kits of components and fully built 
up and tested units. Deliveries of boards will commence in late November. Hurry! They are sure 
to be very popular. 



Continued from Page 6 (G.T. 8ASIC) 

How, I'll leave you all to puzzle that one out and this month, set you some homework! 

The problem is to write a simple DECIMAL to HEXADECIMAL conversion routine using only those 

instructions that we have discussed so far in this course. 

It need only convert a single number to 15, and next month I'll use a version of this as the 

basis for bigger and better things. 

I'm afraid that there aren't any prizes for the best solution - even if I could persuade the Editor 

to put up an expansion interface or three, I'm obliged .to start on Part 4 immediately. 

- 0000000000 - 
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*• SUPEROOS FORUM ** NEWDOS 80 examined in detail by Peter Hartley. 

I ended the last edition of Better Bytes by expressing the view that I would rave on at length 
about NEWDOS 80. Herewith. . .the first ravings. 

While we at MICRO-80 appreciate that a number of you out there have not yet invested in this 
amazing new DOS, we have decided to adopt SUPERDOS as our standard DOS. The primary reason for 
this is the great wealth of power that SUPERDOS vests in the '80 - and we like POWER!!!! We 
believe that any serious Disk user should have the best. All our readers keep permanent files of 
MICRO-80 anyway and as YOU all want the BEST, we've decided to start this column now so that when 
you all eventually get the best, you'll have a file of info to get you going. 

First off, let me say that SUPERDOS is upward compatible with both TRSDOS 2.3 and NEWDOS 2.1. 
However, many of the SUPEROOS features are not downward compatible. That is to say that any 
software written for TRSOOS or NEWDOS 2.1 will run under SUPEROOS, but software that uses the 
advanced SUPERDOS features will crash under the earlier DOS's. 

SUPERDOS is very very fresh off the drawing board and experience suggests that this would mean bugs 
galore. APPARAT, however, has an excellent reputation in this regard and the manual comes with a 
list of minor corrections that are simply applied using SUPERZAP - one of the more famous utilities 
that forms a part of every APPARAT OOS. 

The first thing to do on receiving your SUPERDOS is to make a 8ACKUP, so that the corrections, or 
ZAPS can be applied to the backup and not to your $149.00 master disk. However, NEWDOS 80 does not 
have a backup utility, using instead an amazingly flexible COPY command. A part of the SUPERDOS 
keeps a record of how many tracks you have on which Drives. On the master disk, this is set to 35 
tracks for all. If your Drives are 40 track or anything else other than 35, you will have to reset 
this information before commencing your original backup. 

1.) Locate a nice new blank diskette and then instal your precious master disk into 
Drive and boot DOS with the reset BUTTON. 

2.) If you are only running one 35 track drive, type 
COPY, ;0, TO, :0,mm/dd/yy, PASSWORD, UB8 (ENTER) 

3.) If you are running two or more 35 track drives, insert a new diskette into 
Drive 1 and type 
COPY, :0, TO, :l,mm/dd/yy, PASSWORD (ENTER) 

4.) If you are running one 40 track Drive only, type 

PORIVE :0,0,OTC-40 (ENTER). Now reboot the system with the RESET BUTTON 

and then type 

COPY, :0=35,T0, ;0,mm/dd/yy, PASSWORD, UBB (ENTER) 

5.) If you have a mix of 35 and 40 track drives, you will have to make a decision 
as to which will be used for Drive 0. Because the full SUPERDOS is so 
comprehensive, and therefore so big, my personal preference would be to use a 
40 track Drive for Drive 0. However, it is a simple matter to make smaller 
"minimum system SUPERDOS system diskettes" to use in certain types of application. 

(For example, a minimum system 8ASIC SUPERDOS will leave some 35+ grans free 

on a 40 track Drive). If drive 1 is 35 track and Drive is 40 track, type 

PDRIVE :0,0,DTC-40 (ENTER). 

Now reboot the system with the RESET BUTTON, and type 

COPY, :1, TO, :0,mm/dd/yy, PASSWORD (ENTER) 

**Make sure to transfer your master disk to drive 1 when the system responds with 

"PRESS 'ENTER' WHEN SOURCE DISKETTE MOUNTED IN ORIVE 1" and to put a new 

diskette into Drive 0. 

If drive 1 is 40 track and Drive is 35 track, type 

PORIVE :0,1,DTC=40 (ENTER). 

Now reboot the system with the RESET BUTTON, and then type 

C0PY,:1=35,T0,:0 (ENTER). 

** Again make sure that the source disk is moved to Drive 1 at the appropriate time. 

6.) If all your Drives are 40 track, type 

PDRIVE :0,0,0TC=40 (ENTER) PDRIVE :0,1,DTC=40 (ENTER) 

and so on, once for each drive. Now, insert a blank diskette into Orive 1, 

reboot the system with the RESET BUTTON and then type 

COPY, :0=35,T0, : 1 ,mm/dd/yy, PASSWORD (ENTER) 

You should now have a new master SUPEROOS diskette, formatted with the correct number of tracks for 
Drive and can put your original carefully away in a safe place. 

(Perhaps I should explain that the DTC or Diskette Track Count data is only loaded into the system 
on boot-up, hence the need to re-boot after changing the data with PDRIVE which writes directly to 
the disk.) 



ISSUE 11 (OCTOBER 1980! 



HICRO-80 



PAGE 16 



Now comes the matter of applying those corrections. SUPERZAP is now a machine language program, so 
from DOS, type SUPERZAP (ENTER) and study sections 11 and 13 of the manual. You may well find that 
most of the listed corrections have already been applied but this is not always certain, and the 
time spent in checking will be well worth-while. 

The only problem area that I have personally experienced with SUPEROOS is with Electric Pencil, 
where Pencil cannot list its own directory of files created with the nw DOS. It can still locate 
them for loading and still saves them correctly. I'm sure that APPARAT will soon have an answer 
for this. (This fault is not present on the HICRO-80 copy of NEWDOS 80 which works perfectly with 
electric pencil. Perhaps Peter's copy is missing one or two "zaps" - Ed.) 

Finally, a brief word about the FORMAT utility of SUPEROOS. This does not lock out faulty tracks! 

The overall concept of SUPEROOS is that it was to be a "Programmers DOS" and it is assumed that 

every user will understand the structure of the Granule Allocation Table used by the Directory. In 

other words the operator is required to lock out defective diskette tracks using SUPERZAP. 

If your drives are in Al shape and if you are using high-quality diskettes, this presents no 

problem, as the normal error rate will be minimal. 

However, for those of you out there who would prefer that the "system" looked after this aspect of 

formatting a new diskette, I have prepared a listing of a simple BASIC package that gives this 

facility, and would be pleased to supply it to anyone who sends $2 and a self addressed envelope. 

Next month we'll have a look at the CHAINING FACILITIES of SUPERDOS. 

- 0000000000 - 

***** '80 USERS' GROUPS ***** 

The following is a list of '80 Users' Groups. If you have a group that is not included here, 
please let us know about it so that we can publish details. Owners of System '80s are welcome at 
all the groups. 

8RISBANE: Contact: Mr. Lance Lawes, 

Tel: Home (07)396 2998 

8us. (07)268 U91 Ext. 15 
MEETINGS 1st Sunday of the month at 2 p.m. at 21 Rodney St. Lindum, 4178. 

MELBOURNE: EASTERN SUBURBS - 1 

Contact: Mr. John Fletcher, 89 0677 bet. 9-4 

EASTERN SUBURBS - 2 

MEETINGS: 3rd Wednesday of the month at Kingswood College, 355 Station St. 8ox Hill. 

FRANKSTON: PENINSULAR GROUP 

(Vic.) MEETINGS: 2nd Tues. of the month (except Jan.) 

Contact: M.G. Thompson (03)772 2674 

GEELONG: *GEEL0NG COMPUTER CLUB 

MEETINGS: 2nd Tues. of the month at TYBAR Engineering, Hampton St. Newtown. 

Contact: The Geelong Computer Club, 
P.O. Box 6, Geelong, 3220. 

DARWIN: Contact: Tony Oomigan, P.O. Box 39086, 

Winnellie, N.T. 5789. 

• 

ADELAIDE: Contact: Rod Stevenson, 51 5241 bet. 9-4 



* THE GEELONG COMPUTER CLUB 

The Geelong Computer Club held its Annual General Meeting on the 4th Oct. 1980 at which a formal 

club constitution was adopted. The club has an active membership of approximately 20 persons and 

is open to all members of the public interested in computers, there is a yearly subscription fee of 

S5.00. 

The club has an active TRS-80 and System 80 subgroup with eight members owning these systems and 
experiencing the ectasy and agonies of operating them. From addresses of letters sent to readers 
request section of MICR0-80 it appears as though there are other TRS-80 and System 80 owners in the 
Geelong Region who could benefit by being in and/or known to the club. 

- 0000000000 - 
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***** NEW FROM MICRO-80 
We have a host of new products and software 

MICROTEK MEMORY EXPANSION/PRINTER MODULES 
A number of our readers expressed interest 1n 
the memory expansion module we developed 
earlier in the year. Unfortunately, there was 
not sufficient interest to make it worthwhile 
continuing with this rather expensive project, 
particularly as a completely assembled, tested 
unit would have had to sell for more than 
S200. 

Fortunately, MICROTEK in America had the same 
idea and with the larger population and 
greater resources, has been able to produce a 
similar unit which we can sell for only $149. 
We are disappointed that we were unable to 
produce our own design economically but are 
happy to of f er you the MICROTEK unit. It 
comes fully assembled and tested in a metal 
cabinet of similar size to the Tandy expansion 
interface so that you can sit your monitor 
atop it. The MICROTEK unit intercepts the 
Tandy power supply cable and has its own 
internal rectifiers and regulators. As well 
asp-oviding sockets for 32K of memory, it also 
has a Centronics parallel printer port which 
enables you to run a line printer or the 
Olivetti ET-121. Full instructions for 
connecting to your system and adding memory 
chips &re included. 

MICROTEK MT32-A OK $149 

MICROTEK MT32-8 16K $208 

MICROTEK MT32-C 32K $262 
Incl. p&p. The memory supplied is our prime, 
branded 200 nanosecond kit. Fitting is 
included in the price if memory is ordered 
with the module. 



***** SYSPAND-80 FOR SYSTEM 80 COMPUTERS ***** 

$119 incl p&p. 
The SYSPAND-80 adaptor designed by MICRO-80 
PRODUCTS is now available in fully assembled 
and tested form. Kits and kit prices will be 
announced next month. The SYSPAND-80 connects 
to the rear of the SYSTEM-80 and provides a 
Centronics parallel printer port plus the Tandy 
bus so that you can run a Stringy Floppy, the 
MICROTEK memory expansion module or even a 
Tandy expansion interface/disk drives etc. from 
your SYSTEM-80. The SYSPAND-80 has its own 
plug-pack power supply and internal regulator 
so it imposes no additional load on the SYSTEM 
80 power supply. 



40 PIN EDGE CONNECTORS $12.30 *50c. p&p 

These difficult to obtain connectors are 
essential if you are working on a hardware 
project requiring connection to the TANDY bus. 
The connector attaches to a 40 way ribbon 
cable and plugs straight on to the back of 
your TRS-80. 



***** GREEN SCREEN SIMULATOR ***** 
$19.95 incl. p&p 
The GREEN SCREEN SIMULATOR is made from a deep 
green perspex, cut to fit your monitor. It 
improves contrast and is much more restful to 
the eyes than the normal grey and white image. 

All " the editorial staff of MICRO-80 
(including Scrooge Mc. Hartley) are now using 
GREEN SCREEN SIMULATORS on their own monitors. 

Please make sure to specify whether you have 
an old (squarish) or new (rounded) style 
monitor when ordering. Not available for Dick 
Smith monitors. 



PRODUCTS ***** 

for TRS-80/SYSTEM 80 microcomputers. 

OLIVETTI ET-121 DAISY WHEEL TYPEWRITER FOR '80 

only SI995 
fff#flf##l#l#f##ff|#fffffffffff#fff#ff#ff<PI#fff 

MICRO-80 PRODUCTS has developed an interface to 
drive the OLIVETTI ET-121 typewriter from a 
Centronics parallel printer port. The ET-121 
is a quiet, high speed (20 cps) 
auto-correcting, electronic typewriter 

utilising a Z 80 microprocessor. We have 
mounted an interface inside the typewriter 
which does not interfere with manual operation 
but enables it to be driven as a printer from a 
Centronics port such as is available in the 
SYSPAND-80, MICROTEK module or TRS-80 expansion 
interface. 

This makes an ideal combination for the home or 
office where you need the flexibility of a 
quiet, reliable, superior typewriter which can 
double as a correspondence quality printer when 
driven from your microcomputer. 
This issue of MICRO-80 has been typeset using 
the MICRO-80 OLIVETTI. 

Deliveries commence in December. Secure your 
order by sending a S50 deposit or write asking 
for further technical details. 



DATA SEPARATOR $37.00 plus $1.20 p&p. 

When Tandy designed the TRS-80 expansion 
interface, they did not include a data 
separator in the disk-controller circuitry, 
despite the I.C. manufacturer's 

recommendations to do so. The result is that 
many disk drive owners suffer a lot of Disk 
I/O errors. The answer is a data separator. 
This unit fits inside your expansion 
interface. It is supplied with full 

instructions and is a must for the serious 
disk user. 



DISK DRIVE HEAD CLEANING DISKETTES 
$29.00 plus $1.20 p&p 
Disk drives are expensive and so are 
diskettes. As with any magnetic recording 
device, a disk drive works better and lasts 
longer if the head is cleaned regularly. In 
the past, the problem has been, how do you 
clean the head without pulling the mechanism 
apart and running the risk of damaging 
delicate parts. 3M's have come to our rescue 
with SCOTCH BRAND, non-abrasive, head cleaning 
diskettes which thoroughly clean the head in 
seconds. The cleaning action is less abrasive 
than an ordinary diskette and no residue 1s 
left behind. Each kit contains: 

- 2 head cleaning diskettes 
- 1 bottle of cleaning fluid 
- 1 bottle dispenser cap. 



****** DISKETTE BREAKTHROUGH ****** 

40 TRACK NASHUA DISKETTES (in library case! 
SINGLE SIDE/SINGLE DENSITY $45.00 box of 10 

40 TRACK VERBATIM DISKETTES 
DOUBLE SIDE/DOUBLE DENSITY $59.00 box of 10 

77 TRACK VERBATIM DISKETTES 
SINGLE SIDE/SINGLE DENSITY $59.00 box of 10 

All prices include p$8p. 



ISSUE 11 (OCTOBER 1980) 



MICRO-80 



PAGE 18 



NEWDOS 80 IS IN STOCK, (only $149) 
This long-awaited disk operating system has now 
arrived and has already been delivered to many 
eager customers around Australia. It is every 
bit as good as 1t was cracked-up to be and 
MICRO-80 has decided to standardise on it for 
its own systems. Here are just a few of the 
many things you can do with NEWDOS 80 which is 
upward compatible with TRSDOS and NEWDOS + 
(i.e. TRSDOS and NEWDOS ♦ programs will run on 
NEWDOS 80 but the reverse is not necessarily 
so.) 

* New BASIC commands that support variable 
record lengths up to 4095 bytes long. 

* Mix or match disk drives. Supports any 
track 

count from 18 to 96. Use 35, 40, 77 or 80 
track 5" mini disk drives, 8" disk drives, 
OR ANY COMBINATION! 

* An optional security boot-up for BASIC or 
machine code application programs. User 
never sees "OOSREADY" or "READY" and is 
unable to "BREAK", clear screen or issue any 

direct BASIC statements including "LIST". 

* New editing commands that allow program 
lines 

to be deleted from one location and moved to 
another or to allow the duplication of a 
program line with the deletion of the 
original . 

* Enhanced and improved RENUMBER that allows 
relocation of subroutines. 

* Powerful program chaining. 

* Device handling for routing to display and 
printer simultaneously. 

* DFG function; simultaneous striking of the 
0, F and G keys will allow user to enter a 
mini -DOS to perform some DOS commands 

without 

disturbing the resident program. 

* Includes Superzap 3.0 (improved, machine 
language version of Superzap) and all 
Apparat 2.1 utilities). 



NEWDOS + 

35 TRACK VERSION 

pSp 

40 TRACK VERSION 

p&p 



$99.00 incl. 
$110.00 incl. 



NEWDOS by Apparat, is the third generation disk 
operating system for your TRS-80. NEWDOS 
corrects over 70 errors and omissions in TRSDOS 
and Disk BASIC yet the two are completely 
compatible. Going from TRSDOS to NEWDOS is 
kike going from Level I to Level II, more 
power, more convenience, greater speed. NEWDOS 



includes the following utilities: 

Editor-assembler for Disk 

Disassembler (280 machine code) 

LM offset - allows transfers of any system 



a Disk file-automatically relocated. 

- Lets you convert your computer 
Level I 

- Saves and loads BASIC 1 programs 



tape to 

* BASIC 1 
back to 

* LVIDKSL 
to disk 

• SUPERZAP - display/print/modify any location 
1n memory or on disk. 

• RENUM8ER BASIC program, 
and much more. 



***** MICRO-80 PRODUCTS ***** 
Please use order form on page 36 



***** MICROPOLIS 77 TRACK DISK DRIVES ***** 
These fabulous MICROPOLIS disk drives have more 
than double the storage capacity of the 
standard 35 track drives. 

** DD-7S only $775 incl. p&p ** 
77 track MICROPOLIS drive complete with cable 
for four drives, power supply, chassis and 
includes NEWDOS 80. 



** DD-7 only S649 incl. p&p ** 

Sarce as abov2 but no cable or NEWDOS 80. 

** DC -4 only $45 incl. p&p ** 

4 drive connector cable - suitable for any disk 

drives. 



**** MPI DISK DRIVES ***** 

MPI is the second largest manufacturer of disk 
drives in the world. MPI drives use the same 
form of head control as on 8" drives and 
consequently, they have the fastest 
track-to-track access time available: 5msec. 
All MPIr drives are capable of single or 
double-density operation. (Double-density 

operation requires the installation of a 
special PC board in the expansion interface. 
This board is not yet available in Australia). 
As well as the single head 40 track disk drive, 
MPI also make a dual-head 40 track disk drive. 
A dual-head drive is almost as versatile as two 
single-head drives but is much cheaper. 



Our MPI drives are suppl 
operate with TRS-80. They c 
a simple cabinet made up 
(single-drive cabinets will 
early December - price $10 
the use of a separate power 
volt at 0.7 amp and 12 
drives are sold with a 90 
service is available 
PRODUCTS. 



ied bare, set up to 

an be used bare or 

from sheet metal 

be available in 

.00) . They require 

supply giving 5 

volt at 1 amp. All 

day warranty and 

through MICR0=80 



MPI SINGLE HEAD DISK DRIVE only $339 incl. 

p&p. 

MPI DOUBLE HEAD DISK DRIVE only $449 incl. 

P*P. 

AVAILABLE SOON:- 

MPI 80 TRACK SINGLE HEAD ORIVE only $499 

MPI 80 TRACK DOUBLE HEAD DRIVE only $599 

Ring first to check availability. 



FLOPPY DOCTOR AND MEMORY DIAGNOSTIC 
(by MICRO CLINIC) $29.95 plus 50c. p&p. 
Two machine language programs on a diskette 
together with manual which thoroughly test 
your disk drives and memory. There are 19 
possible error messages in the disk drive test 
and their likely causes are explained in the 
manual. Each pass of the memory tests checks 
every address in RAM 520 times, including the 
space normally occupied by the diagnostic 
program itself. When an error occurs the 
address, expected data, and actual data are 
printed out together with a detailed error 
analysis showing the failing bit or bits, the 
corresponding IC's and their location. This 



is the most thorough 
for TRS-80 disk users. 



test routine available 
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PROGRAMS FROM CREATIVE COMPUTING ** 



** ADVENTURE PROGRAMS ** 
ADVENTURELAND (L2/16K) $14.95 + 50c. p&p. 
Try to find and take treasures as you explore 
a fantasy world. The computer acts as your 
puppet and carries out your two word commands. 
Sometimes you will need special objects to do 
certain things, often a little magic is 
necessary. Absorbing and challenging. 

THE COUNT A0VENTUREU2/16K) $14.95 ♦ 50c. p&p. 
In this adventure, you awaken in a bed in a 
castle in Transylvania. You don't know why 



you are there 
puzzle before 
enthralling as 
thirstier! 



but you'd better 
it's too late. 
ADVENTURELAND 



solve the 

Just as 

but blood 



** 



** 



GAMES 

AIR TRAFFIC C0NTR0LLERU2/16K) $9.95 * 50c. p&p 
One of the hottest selling games in the USA, 
you are the Air Traffic Controller and the 
monitor is your radar screen. Bring down the 
aircraft safely and avoid mid-air collisions. 

Z CHESS (L2/16K) $19.95 + 50c. p&p. 
Seven levels of ability, contains all standard 
moves including castling and En Passant 
captures. It can play either black or white 
and its versatile board set-up mode allows 
specific positions to be played as desired. 

SPACE GAMES (L2/16K) $13.50 ♦ 50c. p&p. 

4 Space Games including ULTRA-TREK, ROMULAN, 
STARWARS and STARLANES. Fast, real-time 
graphics. 

STRATEGY GAMES (L2/16K) $9.50 * 50c. p&p. 

5 Strategy games including TUNNEL VISION (find 
your way out of a 3-D maze), EVASION - avoid 
the deadly snake), JIGSAU (put the puzzle 
together), THE MASTERS (Golf on the '80 for up 
to 4 players), MOTOR RACING (Compete against 
the computer at Indy or the Grand Prix). 

GRAPHING PACKAGE (L2/16K) S9.95 + 50c. p&p 
A setof 6 utility programs which allow you to 
draw BAR GRAPHS, GRAPH CARTESIAN COORDINATES, 
carry out POLAR GRAPHING, PARAMETRIC GRAPHING, 
LINEAR REGRESSION and PARA80LIC REGRESSION. 



** SCOTCH BRAND COMPUTING CASSETTES ** 

These super-quality cassettes are now back in 
stock. 

C-10 pack of 10 S26.00 incl. p&p 

C-30 pack of 10 $28.00 incl. p&p 



*»••« 



16K MEMORY EXPANSION KIT 



«»«*« 



## REDUCED 
These are prime, 
nanosecond) chi 
elsewhere for si 
guaranteed for 1 
is also required 
the TRS-80 - 
All kits come co 
instructions 
photographs. No 
not have to 
technician to in 



TO ONLY $59.00 *!!! ## 

branded, 200 ns (yes, 200 

ps. You will pay much more 

ow, 350 ns. chips. Ours are 

2 months. A pair of DIP shunts 
to upgrade the CPU memory in 

these cost an additional S4.00. 

mplete with full, step-by-step 
which include labelled 

soldering is required. You do 

be an experienced electronic 

stal them. 



** 



PROGRAMS BY MICROSOFT ** 



EDITOR ASSEMBLER PLUS (L2/16K) 
#m REDUCED TO ONLY $37.50 ♦ $1.20 p&p. MM 
A much improved editor-assembler and 
debug/monitor for L2/I6K TRS-80 or SYSTEM 80. 
Assembles directly into memory, supports macros 
and conditional assembly, includes new 
commands-substitute, move, copy and extend. 



LEVEL III 
Loads on 
advanced 



BASIC $59.95 plus $1.20 p&p. 

top of Level II BASIC and gives 
graphics, automatic renumbering, 
single stroke instructions (shift-key entries) 
keyboard debounce, suitable for L2/16K and up 
(Not Disk BASIC) 



ADVENTURE ON DISK $35.95 plus $1.20 
This is the original ADVENTURE game adapted for 
the TRS-80. The game fills an entire diskette. 
Endless variety and challenge as you seek to 
rise to the level of Grand Master. Until you 
gain skill, there are whole areas of the cave 
that you cannot enter. (Requires 32K One 
Disk) 

DISK EDITOR ASSEMBLER 

SAVE $30 ONLY $107 plus $2.00 p&p. 

Supports Macros, linking loader, editor, cross 
references. See Assembly language programming 
article in August MICR0-80 for further details. 
(Requires 32K One Disk) 

BASIC COMPILER $208 plus $2.00 p&p. 

Converts Disk BASIC programs to machine code, 
automatically. A compiled program runs, on 
average, 3-10 times faster than the original 
BASIC program and is much more difficult to 
pirate. Note: MICROSOFT have temporarily 
withdrawn this program for reworking to make it 
less memory-hungry. The revised version should 
be available about the end of NOVEMBER. All 
existing owners will receive updated versions 
at no cost to them. Don't wait though, send in 
your orders now and be near the front of the 
queue. 



-■■■■■- 



BOOKS 



«**•« 



LEVEL II ROM REFERENCE MANUAL $24.95*-$! .20 p&p 
Over 70 pages packed full of useful information 
and sample prorams. Applies to both TRS-80 and 
SYSYEM 80. 

TRS-80 DISK AND OTHER MYSTERIES 
$24.95*$1.20 p&p. 

The hottest selling TRS-80 book in the U.S.A. 
Disk file structures revealed, OOS's compared 
and explained, how to recover lost files, how 
to rebuild crashed directories - this is a MUST 
for the serious Disk user and is a perfect 
companion to any of the NEWDOS's. 



OTHER PROGRAMS 



it* 



INFINITE BASIC BY RACET (32K/1DISK) 
$49.95 + 50C. P&P. 
Full matrix functions - 30 8ASIC commands; 50 
more STRING functions as BASIC commands 

GSF/L2/48K $24.95 * 50c. p&p. 

18 machine language routines includinq RACET 
sorts. 

BUSINESS ADDRESS AND INFORMATION SYSTEM 
(48K/DISK) $24.95 ♦ 50c. p&p. 

Allows you to store addresses and information 
about businesses, edit them and print them 
out. 
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SOFTWARE BY AUSTRALIAN AUTHORS 



.*«*« 



All our software is suitable for 
SYSTEM 80 or the TRS-80 (with the 
Me Think it Micro Mazin vol.2). 



either the 
exception of 



** 



UTILITIES 



- - 



S-KEY by Edwin Paay $15.96 plus 50c. p&p 

S-KEY is a complete keyboard driver routine for 
the TRS-80 and becomes part of the Level II 
basic interpreter. With S-KEY loaded the user 
will have many new features not available with 
the standard machine. 
S-KEY features: 

* S-KEY provides an auto-repeat for all the 
keys on the keyboard. If any key is held 
down longer than about half a second, the 
key will repeat until it is released. 

* Graphic symbols can be typed direct from the 
keyboard, this includes all 64 graphic 
symbols available from the TRS-80/SYSTEM 80 

* S-KEY allows text, BASIC commands and/or 
graphics to be defined to shifted keys. 
This makes programming much easier as whole 
commands and statements can be recalled by 
typing shift and a letter key. 

* 8ecause S-KEY allows graphics to be typed 
directly from the keyboard, animation and 
fast graphics are easily implemented by 
typing the appropriate graphics symbols 
directly into PRINT statements. 



S-KEY allows the 
PRINT statements 
properly. S-KEY 
the LIST routine 
S-KEY allows the 
list of the shift 



user to LIST a program with 
containing graphics, 
does this by intercepting 
when necessary, 
user to list an updated 
key entries to the video 



display or line printer. 
S-KEY can be disabled and enabled when 
required. This allows other routines which 
take control of the keyboard to run with 
S-KEY as well. 



Each cassette 
versions and 
documentation. 



has TRS-80, DISK 



comes 



with 



and SYSTEM 80 
comprehensive 



BMON by Edwin Paay 

THE ULTIMATE HIGH MEMORY 

L2/16-48K 



$19.95 plus 50c. p&p 
BASIC MONITOR 



Our own personnel refuse to write BASIC without 
first loading this amazing machine language 
utility program into high memory! BMON 

Renumbers; Displays BASIC programs on the 
screen while they are still loading; tells you 
the memory locations of the program just 
loaded; lets you stop a load part-way through; 
merges two programs, with automatic renumbering 
of the second so as to prevent any clashes of 
line numbers; recovers your program even though 
you did type NEW; makes one program invisible 
while you work on a second (saves hours of 
cassette time!); lists all the variables used 
in the program; makes SYSTEM tapes; lets you 
Edit memory directly... the list goes on and on. 
Cassette comes with 16K, 32K and 48K versions, 
ready to load. Can anyone affort NOT to have 



$24.95*50c 

a $650 reverse 

45 functions 

6 digits. The 

continuously 

instantly 

culations 



** EDUCATIONAL ** 

RPN CALCULATOR (L2/16K & 32K) 

p&p. 

Give your computer the power of 

polish notation calculator with 

and selectable accuracy of 8 or 

main stack and registers are 

displayed whilst the menu is always 

accessible without disturbing any ca 

or register values. The cassette comes with 

both the 16K and 32K versions, the latter 

giving you the additional power of a 

programmable calculator. Comes with a very 

comprehensive 15 page manual, which includes 

instructions to load and modify the 32K 

programmable version to run in 16K. Whether 

for business or pleasure, this package will 

prove invaluable, and turn your '80 into a very 

powerful instrument. 



TOUCHTYPE (L2/4K) $19.95 

An interactive, 22 lesson typing 
computer ' s keyboard 



+ 50c. p&p. 
course which 
uses the computer's keyboard and screen to 
teach you to type rapidly and accurately and, a 
massive cassette data dump to control your 
progress. The computer checks for accuracy, 
and sets timed exercises to check your 
progress. If you have to look at each key 
before you press it, or only use two fingers, 



then this 
will do 
speed . 



program, plus 
some amazing 



a little 
things 



perseverance, 
to your typing 



U BOAT 
Real time simulation 
working sonar-screen 



-. • 



GAMES 

$7.50 plus 50c. p«6p. 
at its best! Comes with 
and periscope, a full rack 
of torpedoes, plenty of targets, working fuel 
and battery meters, helpful Mothership for 
high-seas reprovisioning and even has emergency 
radio for that terrible moment when the depth 



charges 
II/16K. 



put your crew at risk. Requires Level 



50c. p&p. 
arcade favourite 
cannon blasts. 



SPACE INVADERS $7.50 plus 

Much improved version of this 

with redesigned laser and 

high-speed cannon, 50 roving drone targets, 10 

motherships and heaps of fun for all. Level II 

with 4K and 16K versions on this cassette. 

MMM- vol.1 and vol.2. $7.50 ea. plus 50c. 

p&p. 

Two, three-game cassettes from that master of 

TRS-80 graphics, Charlie Bartlett. Vol.1 

brings you INDY 500, an exciting road race that 

gets faster and faster the longer you play, 

SU8HUNT in which your warship blows up 

unfortunate little submarines all over the 

place, and KNIEVEL las in motorcycle, ramp and 

buses). 

Vol.2 (not System 80 compatible) 

TANK, a two player battle of speed 

THIEF (steal an old man's hoard of 

escape from the labyrinth before he 



and SHOOTOUT 
two). 



containss 

and skill, 

loot then 

gets you), 

(a Mexican style high-noon for 



BMON? 

DALEK CHASE (L2/16K and up) $7.50 ♦ 50c. p«p. 
An absorbing game in which you save Dr. Who from pursuing Daleks. The better you play, the harder 
it gets (and vice versa). Infinite range of play levels from HARD to UTTERLY IMPOSSIBLE, and comes 
complete with messages of praise and mediocre insults. (If you are really bad enough at this game, 
it actually refuses to play any more!) ENTHRALLING FUN FOR ALL. 
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***** E.S.F. FORUM - by Charlie Bartlett ***** 
Judging by the number of ESF's that MICRO-80 PRODUCTS is selling, I get the idea that I am not the 
only one who thinks they are the best thing since the invention of the TRS-80. 

This month I would like to tell you something about the ESF that is not described in the manual. 
Hang on to your hat, 

YOUR ESF PACKS DATA BEFORE WRITING TO WAFER. 

For example, using a (YUK) cassette to achieve a reasonable save or load data time you would have 
to write something like this. 
105 FOR X=1T025 

110 PRINT*-l,S(X),S(X*25),S(X*50>,S{X+75) 
115 NEXT X 

The ESF operating system, however, packs data automatically. All you need to type is this:- 
90 DIM S(256) 
100 CLS:(?0PEN1 
105 FOR X=1T0256 
110 0PRINT S(X) 
115 NEXT X 
125 PCLOSE 

Now, load the DATA I/O program and RUN this BASIC program. 

As the program goes through the loop the ESF stores up data until it has 255 bytes and then 

switches on the drive. 

You can observe this happening if you make the following change to Line 105: - 

105 FOR X=l TO 256:PRINT(? 64, "SAVING ITEMS";X 

Now RUN the revised program. X will build up to 52 before the ESF turns on. 

Thats all for this month, There may be no ESF Forum next month due to yours truly spending a short 
time in hospital, so that should give all you new ESF owners time to send in some programs to do 
SUPER DUPER things on this incredible machine. 



** SPECIAL OFFER - EXATRON STRINGY FLOPPY S352.60 INCL.pSp. ** 
All Exatron Stringy Floppies sold by MICRO-80 will include the special chained version of 
HOUSEHOLD ACCOUNTS, developed by Charlie Bartlett. When used on the ESF, this program is 
powerful enough to perform many of the accounting functions in a small business. Remember, 
the ESF comes complete with a comprehensive manual, a 2 way bus-extender cable, its own power 
supply and 10 wafers of mixed length. One wafer contains the Data Input/Output program and 
another the HOUSEHOLD ACCOUNTS program. 

CAN'T MAKE UP YOUR MIND ABOUT THE ESF? 
Then send in S5.00 for a copy of the manual. We will refund your S5.00 IN FULL when you 
purchase an ESF. 



***** A QUICK REVIEW OF THE TRS-80 POCKET COMPUTER, by C. Bartlett ***** 

I recently got my hands on the new TRS-80 pocket computer, there was not enough time for a full 
checkout but I can tell you right now that it is worth every cent. It will operate just like a 
normal calculator in one mode but becomes a fully fledged computer in another mode. It has nearly 
all the Level 2 commands available plus one function called BEEP which, as the name implies, can be 
written into the program to cause the computer to beep any number of times; for instance the 
statement 8E£P(10) will cause ten beeps. 

Print statements operate a little differently in that they stay on the display line until the ENTER 
key is pressed. To compensate for this there is another statement called PAUSE which makes the 
display stay on view for about one second. Programs in memory are not lost when the computer is 
switched off which is a very handy feature. Another useful feature is the KEY WORDS function. 
This gives a user definable key rather like Eddy Paay's S KEY program. 

The computer comes with a large operating manual and the computer itself is provided with a wallet 
for protection. There were many more things it could do but as I said I didn't have it for long as 
the borrowed unit had to be returned in time for a stocktake. 

For the beginner who cannot afford a proper TRS-80 this is an ideal stepping stone in that the 
slight differences in the BASIC are actually less than going from Level 1 to Level 2. For the 
experienced programmer, a great thing to carry around in your pocket for those ideas which suddenly 
come in the middle of the day but which you have usually forgotten by the time you get home. 

All in all a good buy for anyone, well done Tandy. 

- 0000000000 - 
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** MICRO-BUGS ** 

Last month we omitted to publish the explanatory text for the program ESCAPEE. Here it 1s now. 

** ESCAPEE ** 

In this game you have to find an escaped criminal, he is cornered in an underground garage, which 
has 64 pillars (8 x 8). You have to gues which pillar the escapee is hiding behind to catch him. 
After each guess you'll either be told the number of columns or the number of rows you are away 
from the escapee. If you guess is incorrect, the escapee will move one pillar horizontally or 
vertically on the plan (the plan is redrawn after each guess just in case it is messed up when you 
have a guess). 

The subroutine for drawing the plan starts at line 700 and ends at line 760. It is this subroutine 
which is called each time you have a guess. If line 350 is dissected it reads like this - NPUT 
column ' row : IF (column is less than 1) or (column is greater than 8) or ( row is less than 1 J or 
(row is greater than 8) GO TO line 340. At line 360 the column and row are compared with the 
current position of the escapee. If both of these are correct, then the program jumps to line 600. 
The formula at line 465 tells the computer to print an asterisk at the current guess. 

- 0000000000 - 



***** SOFTWARE SECTION ***** 



** SPACE INVADERS - L1/4K** 

That's right, it's another inkey simulator and loads of fun too. There are four types of alien 
space craft, if you shoot down the entire fleet the game continues, after the reinforcements have 
grouped, the aliens continue to regroup until all of your ships have been shot down. 

Line 8 G0S.830:IFP.(112,1)G.8 is the same as: 

8 GOS.830:IFPOINT(U2,1) = 1 G0T08... 

Line 92 IFI.(Z/2)=Z/2 etc. is testing Z.if Z is an even number then line 92 is used, if not the 

program falls through to the next line. 

Lines 150 to 160 may be of interest, I've condensed the original version slightly and increased the 

speed (these lines draw the three structures between your ship and the aliens). 

ORIGINAL VERSION 

150 F.Z*38T.32S.-1:F.X=18T.102 

155 IFX=34X=52 

160 1FX=68X>87 

165 S.{X,Z):N.X:G0S.92:N.Z 

NEW VERSION 

150 F.Z*38T.32S.-1:F.Y=18T.102S.34:F.X=YT.Y+15 

160 S.(X,Z):N.X:N.Y:G0S.92:N.Z 

(Note: there was a full explanation of how the INKEY function can be simulated in a Level I 
machine 1n MICRO-80 Issue No. 3 - February 1980. - Ed.) 



SPACE INVADERS - Ll-MK BY BR. P. VAN EEKEN 



1 C.:fi<0>-ieS:F.Z-lT.S0:GOS.92:N.Z:H-0 

2 P;fl. 328; * YOUR CONTROLS ONLY WORK WHEN BOTH LINES ABOVE ARE VISIBLE. 

3 P. "PRESS 3 OR t TO MOVE YOUR SHIP LEFT OR RIGHT. 

4 p. -PRESS SPACE BAR TO SHOOT THE ALIENS BELOW. 

5 Y-30:F.X-SB6T.842S.128:P. A. X; -SCORES" ;Y; 'POINTS. -:Y-Y+30:N.X 

6 x-S:Y-28:G0S.B3S:Y-34:G0S.82S: Y-3S:GOS.815 

? P. A. 938: "PRESS CLEAR TO START" ; :GOS.8S0 

6 GOS.830:IFP.(112,1)G.8 

9 C.:I-0:F-0:E-0:T-R.(4)*3:D-T-l:G-39 

(No we haven't left anything out! The next line number really is 92 - Ed.) 
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92 IFI. C2^2)-Z-'ZP. ft. Z4; "SPACE INVADERS' :G. 91 

93 P. ft. 24 

94 R.(0,3):RET. 

99 IFH>Z9P.ft.9B3; 'TOP SCORE -*;H; 

11B X-0:F.Z-lT.7:W-100«(7*X*17):ft(Z+21)-W-'100 

120 A( 2 >-W+lZ:fl( 2+7 )-W+17: A< 2+14 >-W+ZZ: X-X+l : N. Z 

140 F.Z-lT.Zl:G0S.9S9:J-I.C(Z-.SV7>+l:0NJG0S.B15.a2S.83S 

143 GOS.92:N.Z 

ISO F.Z-38T.32S.-1:F.Y-18T.102S.34:F.X-YT.Y*1S 

160 S.(X,Z):N.X:N.Y:G0S.9Z:N.Z 

170 F.Z-21T.90S.34:F.X-2T.2+9S.3:R.(X,32):N.X:N.2 

189 H-1:P-R.( 128)+3:GOS.84S:GOS.8S0:IFD>lfl»-SHIPS 

Z05 IFP.C 110.1 >-0L-R.<9)«(-l):GOS.850:GOS.B40 

Z10 IFCP.(il0,l) )«CP.(112.1>-0)«<P.(114,1 ))L-R.(9> 

Zll IFL>BGOS.8S0:GOS.84O 

21S IFP.(114,1)-0GOS.8S0:GOS.ZS0 

ZZ0 IF(P.<112,1))«<R.(7>-7)GOS.304:GOS.850 

2Z2 IFD-0P.A.6S," ";:G.Z3S 

225 IFD<TP.fl.6S; "YOU HAVE' ;D; A«; : T-D:GOS. 858 

229 IFE>FP.ft.B8; "SCORE t" ;E;ft. 106; I ;B«; * SHOT ! ' :F-E:GOS.9S0: IFH<EH-E 

231 F.G-lT.21:IFft(G>>0G-233 

232 N.G:C.:P.ft.88:*REINFORCEHEMTS-:F-F-l:T-T*l:G.99 

233 IFN-0G.18B 

234 G.Z0S 

235 P.ft.2SS:P. "THE ALIENS HAUE SHOT DOWN YOUR FLEET I ! 

236 P. :P.:I. "WOULD YOU LIKE ANOTHER TRY -;ft:IFA-YG.9 

237 C . : E . 

2SB F.A-40T.7S. -1 : IFP. (P.ft-1 )G.280 

260 S.(P,A):S.(P,A-l):R.(P,A):R.(P,A-l):N-ft:G.300 

280 R.<P,A-l):IFft>26G.380 

283 P.fl.6;'WELL';A.SS;'SHOT':IFA<lIZ-0:G.Z87 

284 F.Z-lT.21:G0S.999:IF<P>X-l)»<P<X+7)«(A>Y-l>»<A<Y+3>G-287 

285 N.2 

287 GOS.3S9:I-I*1:F.C-1T.3:GOS.770:IFZ>0GOS.820 

283 IF2<1GOS.800 

29S N.C:IFZ>8A(Z)-0 

Z96 IFZ<1GOS.830 

300 B«--ALIEN":IFI>1B»-ALIENS 

383 RET. 

304 P.fl.55; "WAIT"; :GOS.790:GOS.73S 

305 IF<K-3)«(O-Z+7)Z-0:G.3Z0 

306 IF2<1Z-R.(7)+14 

307 IF(Z-14)»(A(Z1>>0)Z-21 
3ZB GOS.999:IFZ-0Y-Y+6 

321 F.B-Y+2T.44:IFP.<X+3,B)G.330 

3Z7 IFX-0RET. 

328 S.(X+3,B):R.(X+3,B):N.B:G.34S 

330 IFB>39D-D-l:P.A.6; "HIT! '; :F. J-1T.S:GOS.840:N. J 

331 IFD<TN-0:GOS.840 

332 F.M-X+R.(3)T.X+2+R.(3):R.(M,B):N.M 

333 IFD-1AS-SHIP 

34S Z-R.(21 ):G-3-R.(S):G0S.999 
351 C-2: IFZ>14C-1 
3S3 IFZ<8C-3 

355 IF( X+G>A(Z+C»7 )+5 )+( X+G< A( Z+C«7 )-5 >G. 345 

356 IFY>0GOS.8Z0:X-X+G:GOS.998 
360 IFY>0ONCGOS.B35.82S,815 
700 GOS.830:RET. 

778 IFZ>14E-E+10:GOS.83S 

771 IF(Z>7>«(Z<1S)E-E+Z0:GOS.8Z5 

772 IFZ< 1E-E+R. ( 99 ) : 60S. 800: GOS. 80S 

773 IF(Z>0)«(Z<8>E-E+30:GOS-815 

779 RET. 

790 F.B-7T. 1S.-1:IF(P>A(B+ZI )-8>»(P< A( B+Zl )+8)RET. 

791 N.B:RET. 

795 K-0:F.Z-14+BT.lS.-7: IFft(Z)-0K-K+l :N.Z 
79S RET. 

800 R.(X+4,Y+3>:F.U-X+ZT.X+6:R.(V,Y+Z):N.V 

801 R.(X+1,Y+1>:R.<X+Z,Y + I>:R-<X+6,Y+1>:R.(X+7,Y+1> 

802 R.(X,Y):R.(X+1,Y):R.<X+7,Y):R.(X+8,Y):RET. 

805 S.(X,Y):S.(X+1,Y):S.(X*7.Y):S.<X+8.Y) 

806 S.(X+1,Y+1):S.(X+Z,Y+1):S.(X+6,Y+1):S.<X+7,Y+1) 

807 F.U-X+2T.X+6:S.(U,Y+2):N.U:S.tX+4,Y+3>:RET. 
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ais ifx<0x-b 

816 S.<X+2,Y-1 >:S.<X*4, Y-l):S.(X+3, Y):S.<X+3,Y*-1 ):RET. 
82B F.W-Y+1T.Y-1S.-1:F.U-XT.X+6.*R.(U,W):N.U:N.W:RET. 

825 S.<X+l,Y-l):S.tX+S,Y-l> 

826 F.U-X+2T.X+4:S.(U,Y):N.V:S.(X*-3,Y+1):RET. 

830 Z-0:GOS.999:GOS.800:Q-R.<7):X-tQ-l )M?+6:GOS.998:GOS.805:RET. 

835 F.U-X+-1T.X+5:S.CU,Y):N.U:F.U-XT.X+6S.3:S.< V.Y-i):N.U 

837 S.(X+3,YH):RET. 

840 R.(P,41 ):R.(P+1,41):F.X-P-1T.P+2:R.<X,42):N.X 

842 F.X-P-2T.P*3:R.(X,43):N.X 

843 F.X-P-3T.P+4:R. (X, 44 >:N.X:P-P+L: IFP<3P-9 

844 IFP>123P-123 

845 IFN-0RET. 

846 S.CP.41 >:S.(PH,41):F.X-P-1T.P+2:S.<X,42):N.X 

847 F.X-P-2T.P*3:S.(X,43>:N.X 

848 F.X-P-3T.P»-4:S.(X,44):N.X:L-0:RET. 

858 P.A.S6;:F.U-12T. 19S.2:S. <U, 1 >:S. (U+98. 1 ):N.U:RET. 

998 IFZ>-0A<Z)-X«100+Y:RET. 

999 IFZ>-0X-I . < A< 2 )/'100 ) : Y-A( Z ) -X*100 
1030 RET. 



** BIG LETTERS - L1/4K ** 
This program asks you to input letters and punctuation and, when you have finished, prints them 
out in a 4cm. by 4 cm. format, 8 letters per line. You also have the option of having two rows 
of 16 small letters at the bottom of the screen. When the program has completed printing your 
message, it pauses for a moment and then commences to redraw the same message again. This 
continues until you change the message. 

The program was originally developed by a teacher to assist children learn to recognise the 
letters of the alphabet and to spell. The repeat feature was included so the computer could 
continue to reinforce its lesson whilst the teacher moved on to other things. It would be a 
useful routine to build into a longer program such as a spelling test for young children. 

BIG LETTERS - L1'4K BY BR. P- VAN EEKEN 



2 C. :ft(0)-l:p. -TYPE IN YOUR BIG LETTERS, OR: 

3 P. "0-SPflCE 27-HYPHEN 28-LINE END 29-' 30-7 93-FINISH 

4 A-l:B-2:C-3:O-4:E-S:F-6:G-7:H-8:l-9:J-i0:K-li:L-12:M-13:N-14 

5 0-I5:p-16:u-17:R-18:S-19:T-28:U-21:y-2Z:W-23:X-24:Y-25:Z-Z6 

7 P.fi.448:P.A.448;-LETTER-:R(0);:I.fl(fi(0)):IFft(fi(0>)-99G.14 

8 IFR(fl<8)>>30P.* NOi a lG.7 

9 P. :A(fi(0>)-A(A(B)>+S0:A(0)-A(0)+l:G.7 

14 I. -CARE FOR 2 SETS OF IS SMALL LETTERS AT SCREEN BASE ";H 

15 A»- # -:B»-'-:IFA-YI.-SET l";fi»:I.-SET 2-;B« 
30 C.:P.A.916; :X-0:Y-J:R-0:GOS.S0:P.A»;- • : BS 

33 F.B-1T.5:F.D-1T.999:N.D:N.B:R-1:X-0:Y-J:GOS.S0:G.30 

38 F-H-Y-9T.Y-8 

39 IFR-8F.B-X*6T.X+7:S.<B-6,H):S.(B,H+4):S.(B, Y):N.B 

40 IFR-1F.B-X+6T.X*-7:R.(8-6,H>:R.<B.H*4>:R.(B,Y):N.B 

41 N.H:G.90 

58 F.L-1T. A(0)-1:S-A(L> 

51 IF5-50A-10:G.91 

52 IFS-78X--A:Y-Y+0:G.91 

53 REA.A:IFS< >AG.53 

54 REA.A: IFX+AM29X-0: Y-Y+O: IFY>40L-A(0):G.9i 

55 IF<S-59)+<S-G0)*-(S-70)X-X-2 

56 REfi.F:F.01T.F:REA.B 

57 IF<B-1 >*<B-25)+(B-23)*(B-29)GOS.200 
SB IF( B-2 )+( B-16 )♦( B-22 >♦< B-26)G0S. 210 

59 IFB-13G.270 

60 IFB-4GOS.230 

61 IF<B>4>«<B<8)G0S.248 

62 IF<B>7>«(B<11 )GOS.2S0 

63 IFCB-U >+(B-12)+(B-3)G0S.228 

64 IF8-14GOS.260 

65 IFCB-15)KB-27)G0S.288 

66 IF<B>16)»(B<20)GOS.Z98 
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67 IFB-20GOS.300 

68 IFB-21GOS.240 

69 IFB-24G0S.216 

70 IFB-3BGOS.310 

72 IFB-31G.38 

73 zrsozG.se 

74 K-X+7:IFS-77K-X+2 

76 F.H-KT.K+5:IFR-0S.<H,Y-S> 

77 IFR-1R.CH.Y-S) 
76 N-H 

90 N.C 

91 X-X+fl 

92 IFfHL+lX-SREST. 
S3 N.L:REST. :RET. 

100 D. SI, 22, 3, 1,2,4,52.16,6.3.5. 6. 7,8,3, S3. IS, 3, 3. 5. 7 

103 D.S4. 16. 4, 3, 5, 7, 10, 55. 15, 4, 3. 5,8.7,56.15,3,3.5,6 

106 D. 57. 16, 5, 3. 5. 7, 8. 32,58, 16, 3, 3. 11. 6, S3. 15. 3. S, 7, 12 

103 D.G0. 16,3, 13,11,7,61.14,2.3.14.62.15,2,3.7 

112 D.63, 16,3,3, 11, IS, 64, 16,3,3. 16, 11,65,16,4,3.5,11,7 

115 D. 66, 16, 4, 3, S, 3, 6. 67. IS, 5, 3, 5, 11, 7, 17, 68, 16, 5,3, 5, 3,6. 18 

118 D.63, 16.5,5.20,6,8,21,70, 15.2.5,12,71, 16,3,3,7,11 

121 D. 72, 21, 2, 22, 23, 73, 31, 4, 22, 24, IS, 2S, 74, 12, 2. I, 2S 

124 D.75, 14,2,29.27,76. 16,3,5.23.7.77, 12,1. 32 

125 D.73,8, 1.30,88. 16, 4, S, 3,31, 32 

200 E-Y:K-X:IFB-23K-X+3 

201 IFB-25K-X+13 

203 IFB-2SK-X+2 

204 F.D-KT.K+3:IFR-0S.(D.E>:S.(D,E-1> 

205 IFR-1R.'D,E):R.(D.E-1) 

206 E-E-1:N.D:RET. 

210 H-X+2:E-Y-10: IFB-2H-X+1B 

211 IFB-22H-X 

212 IF8-26H-X 

213 F.D-HT.H+3:IFR-0S.<D,E>:S.(D.E+1> 

214 IFR-lR.<D,E>:R.tD,E+l> 

215 E-E+l:N.D:RET. 

216 E-Y:D-X+10:F.H-DT.D*3:E-E-1:IFR-0S.<H,E) 

217 IFR-1R.<H,£> 

218 N.H:R£T. 

220 K-0:ZFB-11K-12 

Z21 IFB-12K-7 

223 F.D-Y-10T.Y: IFR-0S. <X+K, D):S. < X+K+l, D) 

224 IFR-1R.(X+K,D):R. (X+K+l, D) 
Z25 N.D:RET. 

230 E-Y-S:F.D-X+6I.X+14: IFR-BS.(D.E) 

231 ZFR-IR.(D.E) 

232 N.D:RET. 
Z40 IFB-SE-Y-10 

241 IFB-6E-Y-S 

242 IF(B-7>+<B-21 )E-Y 

243 H-2--IFB-21H-0 

245 F.D-X+HT.X+12:IFR-0S.CD,E) 

246 ZFR-IR.(D.E) 

247 M.D:RET. 
258 IFB-8E-Y-1 

251 ZFB-9E-Y-6 

252 F-3:IF8-18E-Y-l:F-8 

ZSS F.D-X+12T.X+13:F.H-E-FT.E:ZFR-0S.tD,H> 
258 IFR-IR.(D.H) 
257 N.H:N.D:RET. 

260 E-Y-5:F.D-X+2T.X+6:IFR-0S.(D,E) 

261 IFR-1R. (D.E) 
Z6Z M.D:D-D-1 

263 E-E- 1 : F. G-DT . D+l : ZFR-0S . < G, E ) 

264 IFR-IR.(G.E) 

265 N.G:IFEOY-10D-D+l:G.2S3 

Z66 E-Y-4:D-X+6:F.M-lT.5:F.G-DT.D+l:IFR-0S.tG,E) 

Z68 IFR-IR.(G.E) 

263 N.G:E-E+1:D-D+1:N.M:RET. 

270 F.D-X+8T.X+S:IFR-0S.(D,Y-10) 

271 ZFR-1R.<D,Y-1B) 

272 N.D:F.D-X+ZT.X+3:F.H-Y-2T.Y:IFR-0S.(D,H> 
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(We haven't left anything out here either! There is no Line 273 - Ed.) 

274 IFR-IR.(D.H) 

275 N.H:N.B:G.90 

280 E-Y-10:F.D-XT.X+S:IFR-0S.(B,E):S.<D+1.E> 

281 IFR-iR. CD.E):R.(D+1,E> 

282 E-E+1:N.D:E-Y-10:IFB-2?RET. 

283 F.D-X+12T.X+6S. -1 

284 IFR-0S.(D,E>:5.(D+1,E> 

285 IFR-1R.(D,E>:R. CD+l.E) 

286 E-E+l:N.D:RET. 

290 E-Y-S:H-X+10:IFB-18H-X+6 

291 IF8-19H-X+14 

292 F.D-HT.H+5:IFR-0S.(D,E):IFB<19S.(D+1,E) 

293 IFR-1R.(D,E):IF8<19R.(D+I,E> 

294 E-E+l:N.D:RET. 

300 F.D-Y-10T.Y-S:IFR-8S.<X.D>:S.(X+1,D> 

301 IFR-1R.<X,D):R.(X+1,D> 

302 N.D:RET. 

310 F.H-X+2T.X+S:1FR-0S.(H, Y-10):S. <H, Y-9 >: IFH>X+3S. < H, Y-B) 
312 IFR-lR.(H,Y-10):R.<H,Y-9):IFH>X+3R.(H,Y-8) 
31S N.H:RET. 



***** TANK BATTLE (L2/4K) ***** 
This one will kill you! Two tanks move around in a maze trying to blow each other to bits. The 
first player to destroy ten tanks is the winner. To control the tanks the left hand player presses 
"1" to turn and "2" to move. To fire he presses both keys at the same time. The right hand player 
presses "9" to turn and "8" to move and presses both together to fire. 

After a tank has been hit it is automaticly moved to a different position in the maze to prevent 
the other player scoring a second hit and to give the injured party time to recover from being 
wiped off the face of the earth. 

' TANK BATTLE LIIX4K - BY B. J. MOORHOUSE 

1 ' 315 EUREKfi STREET , BftLLfiftRAT , YIC. 3350 

2 CLS:F0RX-2T012S:SET(X,2>:SET(X,4S):NEXT:F0RY-2T04S:5Er(2,Y):SET(12S,Y):NEXT 

5 FORX-15370TO15413STEP10:FORY-X+64TOX+896STEP64:T-RND(3>:IFT-1THEN7 

6 POKEY. 191 

7 NEXTY.X 

8 GOT 0300 

10 IFPEEK(PS+DK>32THENRETURN 

20 POKEPS, 32 : POKEPS+1 , 32: POKEPS+2 , 32: PS-PS+E 

30 ONRTGOTO50. 60,70 

40 POKEPS, 179: POKEPS* 1, 131 : POKEPS+2. 140: RETURN 

50 POKEPS, 188: POKEPS+1, 143: POKEPS+2, 188: RETURN 

60 POKEPS .140: POKEPS* 1.191: POKEPS+2 . 1 79 : RETURN 

70 POKEPS. 143:P0KEPS*1. IBS: POKEPS+2, 143:RETURN 

80 ONRTGOTO108.110.120 

90 D-3:E-l:RETURN 

100 D- -64 :E- -64: RETURN 

110 D— 1:E— 1: RETURN 

120 D-64:E-64:RETURN 

130 F-PS*D 

148 IFF-P9ORF-P9+1ORF-P9+2THEN180 

150 IFPEEK(F)O32THENP0KEF-E. 32: RETURN 

160 POKEF,42:POKEF-E.32 

170 F-F+E:GOTO140 

180 S— l:POKEF-E,32:FORW-0TO19:POKEP9, 174:POKEP9+l, 140:POKEP9+2, 157: POKEPS. 32 = PO 
KEP9+ 1.32: POKE P9+2,32:NEXTW 

182 P9-RNDC 1024 )+15360: IFPEEK( P9 )< >320RPEEK( P9+1 X >320RPEEK< P9 >< >32THEN182 

183 RETURN 

300 Pl-lS74G:P2-15802:Rl-4:R2-2 

310 PS-PI : RT-R 1 : GOSUB30 S PS-P2 : RT-R2 : GOSUB30 

320 IFPEEK( 16442 )-6THENPS-Pl:S-0:RT-Rl:P9-P2:GOSUBB0:GOSUB130:P2-P9:PS-P2:RT-R2: 

GOSUB30: XFSTHEN1000ELSE370 

330 IFPEEKC 16442 >-4THENPS-Pl :RT-R1 : GOSUB80: GOSU810: PI-PS: GOTO370 

350 IFPEEKC 1S442>O2THEN370 

360 R1-R1+1:IFR1-STHENR1-1 

365 PS-P1:RT-R1:GOSUB30:GOTO370 

370 IFPEEKf 16443 )-3THENPS-P2:S-0:RT-R2:P3-Pl:GOSUB80:GOSUB130:Pl-P9: PS-PI :RT-R1: 

GOSUB30: IFSTHEN10S0ELSE320 
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380 IFPEEK( 16443)-1THENPS-P2:RT-R2:GOSUB80:GOSU810=P2-PS:GOTO320 

390 IFPEEK< 16443 )< >2THEN320 

400 R2-R2+1:IFR2-5THENR2-1 

410 PS-P2:RT-R2:GOSUB30:GOTO320 

1000 Sl-Sl+l:IFSl-10THENflS--LEFT:GOTOlS00 

1010 GOTO370 

1050 S2-S2+1: IFS2-10THENM--RIGHT- :GOTO1500 

10B0 GOTO320 

1S00 CLS:PRINT»216,'G ft M E O V E R " 

1510 PRINT:PRINTA«;" PLAYER WON THfiT GAME" 

1520 PRINT:PRINT-SCORES LEFT PLAYER "SSU" HITS" 

1530 PRINT" RIGHT PLftYER ":S2;- HITS" 



***** RESISTOR DECODER (L2/4K) ***** 
Here is a program that will be a great help to all those amateur electronic buffs who cannot 
remember what the coloured bands on resistors stand for without looking them up. With this program, 
you just type in the colours of the first three bands from left to right, separated by commas and 
then press ENTER/NEW LINE. 

The program then asks for the colour of the fourth band (which indicates the tolerance of the 
resister). If there is no fourth colour, enter NO COLOUR. The program then returns with the vslue 
of the resistor and it's tolerance. 



RESISTOR COLOUR CODE DE-CODER LII'4k - BY J. ANDERSON 
J-2S0 OCEAN BEACH ROAD, SORRENTO, 3S43 

10 CLS 

20 PRINT»19, "RESISTOR COLOUR CODE TRANSLATOR" 

30 INPUT-ENTER THE THREE COLOUR'S FROM LEFT TO RIGHT SEPARATING THEN BY A COMMA 
< . ) -;0»,SS,FS 

31 INPUT "NOW THE FOURTH COLOUR IF NONE THEN ENTER * NO COLOUR* " ; T« 
50 IFO*-" BLACK "THEN 0-00 

50 IFOS-" BROWN "THEN 0-10 

61 IFO«-"RED"THENO-20 

62 IPOS-"ORftNGE"THENO-30 

63 IFOS--GREEN"THENO-50 

64 IFO»-"BLU£"THENO-60 
70 IFO»-"YELLOW"THENO-40 

80 IFOS-"UIOLET"THENO-70 

81 IFO»-"GREY-THENO-80 

82 IFO»-'WHITE"THENO-90 
90 IFSS--BLACK-THENS-0 
100 IFS»-"BR0WN"THENS-1 
110 IFSS-'RED'THENS-2 
120 IFS»--0RANGE"THENS-3 
130 IFS»-*YELL0WTHENS-4 
140 IFS»-'GREEN-THENS-S 
150 IFSS- " BLUE " THENS-6 
160 IFSS-"UI0LET"THENS-7 
170 IFSS--GREY-THENS-8 
180 IFSS--WHITE-THENS-9 
300 IFFS--BROWN*THENF-10 
310 IFF»--RED-THENF-100 
320 IFFS--ORANGE-THENF-1000 
330 IFFS--YELLOW-THENF-18000 
340 IFF«-"GREEN"THENF-100000 
3S0 IFF*-"BLUE"THENF-1000000 
360 IFF»--UIOLET"THENF-10000000 
370 IFF»--GREY-THENF-100000000 
380 IFFS--WHITE-THENF-1000000000 
390 IFTS-*GOLD*THENP»--SK- 

400 IFTS--SILUER-THENPS--10V 

410 IFTS--NO COLOUR -THENP*-'20X ' 

420 R-<0+S)«F 

430 PRINT-RESISTANCE-' ;R; "OHMS TOLERRNCE-" ;P» 

440 RI-((O+S)»F)-'1000: PRINT-RESISTANCE-- ;RI; "KILOHMS TOLERENCE-" ;P» 

939 INPUT-DO YOU HAVE ANY MORE PROBLEMS" :Z«: IF2«-"YES*THENRUN 
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***** CONCENTRATION L2/16K ***** 
This game is for 1 to 5 players. If you wish, the computer will be one of the players just by 
typing in COMPUTER when the program asks for the players names. The program draws three rows of 
cards, you select a card from one row and the program turns the card over, then you select a second 
card. If they match you score 5 points, if they do not match the cards are turned back over and 
thats where the concentration comes in, trying to remember what card was where. Lots of 
instructions are included in the game, so not a lot more need be said here except CONCENTRATE. 



CONCENTRATION LII'IEK - BY C. PARKINSON 
47 SILLMON WAY 
DUNCRAIG W.A. 6023 

10 CLS:PRINTCHR*<23):PRINT#390, *C ONCENTRATIO N"; 

IS FORT-ITO40 

20 X-RNDC 1023 ) : IFPEEKt X* 1S3S0 X >32THEN20ELSEPOKE< X+1S368 J . 63 

25 FORTT-1TOS0: NEXT: NEXT 

30 PRINT:PRINT:PRINT:PRINT:PRINTTAB(S)"DO YOU WANT THE RULES ?"; 

40 RS-":RS-INKEYS:IFR*--'THEN40 

50 IFRI- ' V" THENGO5UB600 : CLS : GOTO70 

60 IFRS< > " N ' THEN40ELSECL5 

70 PRINT»398, 'HOW MANY PLAYERS (I - 5>" 

72 P»-INKEYS: IFPS---THEN72 

73 P-VAUP*) 

75 IFP>S0RP<1THENPRINTTAB< 1S)*I SAID 1 - S DUMMY" ; :FORT-1TO508:NEXT: GOTO70 

76 PRINT:PRINT"PLEASE ENTER YOUR NAMES" rPRINT 
80 FORI-1TOP:PRINT*PLAYER* Jl; : INPUTP»( I ):NEXT 
100 DIMC(3,9>,0<27),A<3,9),BC3,9),MEC3,9) 

104 CLS: PRINT»399,CHRS( 23); 'SHUFFLING- 

105 GOT 0220 

110 CLS:FORX-4TO100:SET(X,3):SET(X,I1):SET(X.15):SET(X,23):SET<X,27):SET(X,35):N 

EXT 

120 FORX-13TO100STEP11:GOSUB1S0:NEXT 

130 FORX-14TO100STEP11:GOSUB150:NEXT 

140 GOTO160 

150 RESET(X,3):RE5ET(X.11):RESET<X, 1S):RESET<X,23):RESET(X,27):RESET(X,3S):RETUR 

N 

163 FORY-3TOU:GOSUB200:N£XT 

170 FORY-15TO23:GOSUB200=NEXT 

180 FORY-27TO35:GOSUB200:NEXT 

190 GOTO2I0 

200 SET<4,Y):SET<12 f Y):SET(lS,Y):S£T(23,Y):SET(26,Y>:SET(34,Y>:SET07,Y):SET(4S. 

Y):SET(48,Y>:SET<S6.Y):SET(S9,Y>:SET<67,Y>:S£T(70.Y>:5ET(78.Y>:SET<8l,Y):SET(89, 

Y):SET<92,Y):SET(100.Y):RETURN 

210 PRINT»3."X 2 3 4 5 6 7 S 9" ; : PRINT»1B0, "ROW 1*; 

:PRINT»436. 'ROW 2" : :PRINT»692, "ROW 3"; 

211 PRINT»2S9,*1 2 3 4 5 6 7 8 9" ; :PRINT»S15. ' 1 

23 4 567 8 9*; 

21S GOTO320 

220 FORI-1TO3:FORJ»1TO9:C(I,J)-0:ME(I,J)-12:NEXT:NEXT:FORI-1TOP:SC(I)-0:NEXT 

230 DATA1. 2. 3, 4, 5, 6, 7. 8, 9, 132, 137. 143, 148, 154, 159, 165, 170, 176, 388, 393, 399, 404, 41 

0, 415. 42X, 426. 432, 644, 649, 655, 660. 666, 671. 677, 682. 688 

248 RESTORE : FOR I - 1 T09 : RE ADDC I ) : NEXT 

245 F0RI-1T03:F0RJ-1T09:READB(I,J):NEXTJ,I 

250 RESTORE:FORI-10TO18:READD(I):NEXT 

260 RESTORE : FORI - 19T022 : READD< I ) ! NEXT 

265 RESTORE:FORI-23T026:READD< I >:NEXT 

266 D(27)-10 

288 FORI-1T03:FORJ-1T09 

230 R-RND(27): IFD(R)-0THEN290 

29S IFD(R>-10THEND(R)-0 

300 C(I,J>-O(R):O(R>-0 

310 NEXTJ.I 

315 GOTO110 

320 F0RI-1T03: F0RJ-IT09: PRINT*B( I , J ) , '•' ; I NEXTJ, I 

330 FORPL-ITOP 

33S IFTC-26THENS00 

336 IFP»(PL)- , COMPUTER , GOSUB1000:GOTO342 

340 PRINI9832,CHR*(30):PRINT»832,PS<PL);- FIRST CARD. ROW : : INPUTL:PRINT»866. ■ C 
OLUMN';:INPUTM:IFL<1ORL>3ORM<1ORM>9THENPRINT»832.CHR*(30»; :GOTO340 
342 IFC<L,M)-10THEN336 
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3-13 PRINT»B(L,M)-1,C<L,M>;:ME(L,M)-C(L,M> 

346 IFC<L,M)-0THENPRINT»832.CHRS<30):PRINT9848.*SORRY -;PS<PL);" YOU MISS fl TURN 
"; :FORT-1TO2000: NEXT: PRINTM(L,M )."♦"; : :NEXT:GOTO330 

347 IFPS(PL)-"COMPUTER"GOSUB1100:GOTO35S 

350 PRINTS308, * SECOND CARD ROW ;: INPUTN: PRINT»930. 'COLUMN* ;: INPUTO: IFN< 10RN>30R 
0< 10R0>9THENPRINT»896. CHR»( 30 ) ; :GOTO3S0 

355 IFL-NANDM-OTH£NPRINT#89S.CHRS<30):GOTO350 

356 IFC(N,O)-10THtN34? 

360 PRINT»8(N,0>-1,C<N,0>; :ME(N,0)-C(N,0> 

370 IFC(N,O)-C(L,M)THENSC(PC)-SC<PL)+S:TC-TC*2:GOTO400 

380 PRINT*832.CHRSf30):PRINTe840, 'SORRY ";PS(PL>i" THEY DON'T MATCH* :FORT-1TO200 

0:NEXT:PRINT#B(L,M ),"•"; :PRINT»B< N,0 ), '♦'; : NEXT : GOTO330 

400 PRINT»832.CHRS(30):PRINT»840, "WELL DONE ";PS(PD;* YOU SCORE S POINTS* ; :FORT 

-1TO2000:NEXT:PRINT*B(L.M), ' '; :PRINT»BCN,0), " "; :CCL,M)-10:C<N,O>-10:ME< L,M )-10 

:ME(N,O)-10-*GOTO33S 

S00 CLS:PRINT»200, "THEN GOME IS OVER. THE SCORES ARE AS FOLLOWS* 

510 PRINT:FORI-lTOP 

520 PRINTTABOSJPSd); ■ SCORED ■ ; SC< I ) 

S30 NEXT 

540 PRINT:PRINT'DO YOU WISH TO PLAY AGAIN ?" 

SS0 At*- ' " : At- 1 NKE YS ! IF AS- ■ ' THEN5S0 

S60 IFAS-"Y"THENS90ELSEIFAS< >'N'THENS40 

570 CLS:PRINT«400,CHRS<23);"BYE BYE' :FORT-1TO2800:NEXT 

580 CLSiEND 

590 CLS:PRINT»40B,CHR«C23); "SHUFFLING*:GOSUB700:FORPL-1TOP:SC( PD-0: NEXT: TC-0: GO 
TO10S 

600 CLS:PRINTTAB(20)-»« RULES ••' 

610 PRINT-PRINT:PRINTTAB(5)'THIS GAME IS SIMILAR TO THE GAME OF CONCENTRATION' : P 

RINTTAB(S) 'PLAYED WITH CARDS'" 

620 PRINTTAB<5) "THERE MAY BE UP TO S PLAYERS- EACH PLAYER TAKES A" :PRINTTAB<S >"T 

URN AT CHOOSING TWO CARDS* :PRINTTAB<5 )'IF THE TWO CARDS ARE THE SAME THE PLAYER 

SCORES S*:PRINTTAB(S)"POINTS AND HAS ANOTHER TURN* 

630 PRINTTA8(S)"IF THE CARDS ARE NOT THE SAME. THAT PLAYER ENDS' :PRINTTAB<5) 'HIS 

GO AND IT IS THE NEXT PLAYERS GO. "iPRINTTABCS)' IF A PLAYER TURNS UP THE '0' ON 
HIS FIRST GO HE*:PRINTTAB(5)*L0SES HIS TURN* 
640 PRINT :PRINTTAB( 1S)"PRESS ANY KEY TO CONTINUE" 
6S0 AS- * * : AS-INKEYS: IFAS-* *THEN6S0 

660 CLS:F0RX-2ST032:SET(X,3):SET<X,11):SET(X.1S>:SET(X.23):SET(X,27):SET(X.3S):N 
EXT:F0RY-3T011:SET(2S,Y):SETO3,Y):NEXT:F0RY-15T023:SET(2S.Y>:SET(33,Y):NEXT:F0R 
Y-27T03S:SET( 2S, Y ): SET( 33, Y ) : NEXT 

670 PRINT»I42. '•" ; : PRINT»147, "THIS IS HOW THE CARDS LOOK WHEN DEALT"; 
675 FORT-1TO1000=NEXT 

680 PRINT#398,"S*;:PRINT»403,'THIS IS ft TURNED UP CARD* ; :FORT-ITO1000:NEXT:PRINT 
#659, "THIS IS A CARD THAT HAS BEEN USED*; 

690 FORT-1TO2000:NEXT:PRINT»832, "IF YOU WANT THE COMPUTER TO PLAY ONE OF THE HAN 
DS ENTER COMPUTERAS ONE OF THE PLAYERS' :FORT-1TO4000:NEXT:RETURN 

700 IFP-1THENRETURN 

701 FORI-lTOP:PPS(I)-":NEXT 

705 FORI-irOP:IFPPS(I)--"THEN710ELSENEXT 

706 GOTO740 

710 X-RND(P) 

71S IFPPS(X)O**THEN70S 

720 FORI-1TOP: IFPS< I K >""THENPPS(X )-PS( I ):PS( I )-" " : GOTO70S 

730 NEXT:GOTO705 

740 FORX-lTOP:PS(X)-PPS(X):PPS(X)-*':NEXT 
750 TROFF: RETURN 

1000 RANDOM:TM-0:PRINT»832 1 CHRS(30):PRINT»842, "COMPUTERS TURN" :FORT-1TO1000=N£XT 

180S L-RND(3):M-RND(9) 

1010 IFME(L.M)-0ORME(L.M)-10THEN100S 

1011 TM-TMH:IFTM<100ANDTC<20ANDME(L,MK>12TH£N100S 
1015 PRINT»832,CHRS(30) 

1020 PRINT»842."I CHOOSE*;L; " . -;M; ■ AND" ; :PRINT»8(L,M >-l.C(L,M); :FORT-1TO2000:NE 
XT: RETURN 

1100 FORI-1TO3:FORJ-1TO9:IFME(I,J)-0ORMECI,J)-10THENNEXT:NEXT:GOTO1120 
1110 IFME< I , J )-C( L , M )THENN-I t O-J: GOTOl 1 15 
1113 NEXT:NEXT:GOTO1120 

1115 IFN-LANDO-MTHENN£XT:NEXT 

1116 IFLON0RMO0THENG0T01148 
1120 N-RND<3):0-RND<3) 

112S IFN-LANDM-0 THEN1120 

1130 IFME(N,O)-0ORME(N,O>-10THEN1I20 

1140 PRINT#B(N.O)-1,C<N.O);:PRINT»861,N;",*;O::FORT-1TO2000:NEXT:RETURN 
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** SYSCOPY L2/16K Machine Language.** 

Have you ever wanted to make a back-up copy of a machine langage tape? First you need a monitor 
program such as 8M0N (described in MICRO-80 Issues 3, 4 & 5 or available on cassette from MICRO-80 
PRODUCTS) which enables you to make SYSTEM tapes. However, that is not much help if you do not 
know where the machine language program to be copied starts or finishes, or its entry point. 
SYSCOPY is the answer. This program loads in a machine language program from tape and then 
displays its START, END and ENTRY addresses in Hex. Even better, it has been designed to reside 
just below BMON so you can use the two programs in conjunction with each other. 

SYSTEN 80/Video Genie users who have been having loading problems with their on-board cassette deck 
get an added bonus from SYSCOPY because it allows you to specify whether the machine language 
program is to be loaded in via cassette port #\ or i*2. Until now, the only way you could load m/1 
programs via the external cassette port was by installing a changeover switch in your machine to 
reverse the roles of the two sockets. All you need to do now is use SYSCOPY and specify the 
cassette port to be used (#-1, or #-2), in accordance with the instructions included in the listing 
(This feature also works on TRS-80's). 

A commented source code listing has been provided to help you understand the operation of the 
program. It will also enable those readers with an editor/assembler to relocate the program to 

reside anywhere in memory. As listed, the origin of the program is 708DH (28861 Dec), which is 
below BMON in 16K machines. The program entry point is 7110H (28944 Oec). If you wish to relocate 
the program, change the "ORG" address in line 790 to the new address and reassemble the program. 

Those who do not have an editor/assembler or are happy with the location of the program, may type 
it in directly using a monitor such as BMON, starting at program line 00810. The column to the 
extreme left of the page contains the address in memory (in Hex) of each Z80 instruction. The next 
column contains the instructions and their operands etc. in Hex, two Hex digits per byte. Commence 
by putting your monitor in the Edit Memory mode at address 70BD Hex. Change the data at that 
address to 2B then change the data at address 70BE to 22, 70BF to 54, 70C0 to 41, 70C1 to CO and so 
on until you reach 7200 which you can leave unchanged. Exit the Edit mode. 

To check the accuracy of your input, Jump to address 7110 when the program should operate 
correctly. Before doing this, however, it is good practice to save the program onto tape. That 
way, if one or two bytes have been entered incorrectly and cause the program to crash or hang-up, 
you need only reload from tape rather than having to type the whole lot in again! 

You can use your monitor to punch out a m/1 tape of SYSCOPY with the following parameters:- 

START 70B0 

END 71FF 

ENTRY 7110 

NAME SYSCPY (note that the has been dropped since only 6 letters are 
allowed in the name) 

To reload your tape (or the cassette edition tape):- 

1. Switch on and answer the MEMORY SIZE? or READY? with 28860. Press the ENTER/NEWLINE key. 

2. Type in SYSTEM. Press the ENTER/NEWLINE key. 

3. Ready the cassette by setting the tape to the beginning of the SYSCOPY program, adjusting the 
volume control if necessary and pressing the PLAY key. 

4. Answer the *? with SYSCPY. Press ENTER/NEWLINE key. 

5. Two asterisks should appear in the upper right-hand corner of the screen. The right-hand 
asterisk should turn on for about 4 seconds, off for a further 4 seconds on again and so on. Those 
with the cassette edition who listen to their tape will hear the signal in bursts. This tape has 
been made directly from the Editor/Assembler and the data is dumped in blocks of 256 bytes with 
short, quiet periods between. 

6. When the program has finished loading the screen will display *?-. Answer this with / press 
the ENTER/NEWLINE key. 

7. Again, the screen will display *?- This indicates that the program is functioning and it is 
requesting the name of a machine language program that you want to load in. Put a tape containing 
a machine language program in the cassette deck. Ready if for loading. Type in the name of the 
program. Press ENTER/NEWLINE. 

8. Again, you will get the two asterisks in the upper right corner of the screen with the right 
hand one blinking at four-second intervals. 

9. When the program has finished loading, the screen will display:- 

START = XXXX END = XXXX ENTRY = XXXX 
On the next line you will again get *?- . This is inviting you to load in another m/1 program. If 
you do not want to do that you can escape back to BASIC by pressing the BREAK key. 

"lO. At any time, you can re-enter SYSCOPY by typing LOAD then pressing the ENTER/NEWLINE key. 
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1997 
B31D 
9212 
0235 

022C 
4152 

4 154 
9314 
4156 

3C3E 

49DF 

91F8 
20FE 

932A 
1BB3 

96CC 
4188 
029B 



79BD 



79BD 2B 
79BE 225441 



00199 

99110 

00120 

00130 

99140 

001S9 

00160 

09170 

00180 

00199 

00200 

00210 

00220 

90230 

00240 

00250 

99260 

00270 

00280 

00290 

09300 

00310 

00320 

00330 

00349 

99359 

90369 

00370 

00380 

90390 

00400 

00410 

00420 

00430 

00440 

00450 

99460 

00470 

00480 

00490 

90S00 

00510 

09520 

00530 

00540 

09SS0 

09569 

00S70 

00500 

90599 

80600 

00610 

00620 

00630 

09640 

00659 

00660 

00670 

00680 

00690 

00700 

00710 

00720 

00730 

00740 

00750 

00769 

09779 

99788 

89799 

09B99 

00810 

09B29 



; SYSTEM SIMULATOR 

■ 

; ANDREW SMALLRIDGE 

: is-'B'eg 

i 

;THE FUNCTION OF THIS PROGRAM IS TO SIMULATE 

;THE SYSTEM COMMAND. IN ITS INITIAL FORM THIS 

; ROUTINE WILL LOAD A SYSTEM TAPE AS PER THE 

; SYSTEM COMMAND. THE DIFFERENCE BEING AT THE 

:END OF THE LOAD THIS ROUTINE WILL DISPLAY 

;THE START, END AND ENTRY POINT OF THE PROGRAM 

iTHIS WILL ENABLE THE COPYING OF A MACHINE 

; LANGUAGE PROGRAM WITH THE BMON PROGRAM 

i 

;THIS PROGRAM WILL ALSO ENABLE THE USER TO 

; SELECT THE CASSETTE DRIVE REQUIRED TO LOAD 

;A SYSTEM TAPE 

;E.G. TO LOAD 'BMON' . ON ENTRY SYSCPY WILL 

;RESPOND WITH •? THE USER MAY ENTER THE 

FOLLOWING OPTIONS: 

; •? BMON 

;THE SYSCPY COMMAND WILL NOW LOAD THE PROGRAM 

;"BMON" FROM CASSETTE DRIVE 1 



; •? •-1.BMON 

;THIS WILL ALSO RESULT 
;FROM CASSETTE DRIVE 1 



IN ' BMON' BEING LOADED 



; •? »-2,BM0N 

; THIS WILL RESULT IN ' BMON' 

; CASSETTE DRIVE 2 



BEING LOADED FRO" 



:ONCE INITIALIZED THIS PROGRAM CAN BE 
; REENTERED USING THE LOAD COMMAND 
;E.G. ENTERING LOAD WILL RESPOND WITH 

;•? 

I 

;AT THE END OF THE LOAD FROM CASSETTE THE 
J SCREEN WILL DISPLAY: 

;START-XXXX END-XXXX ENTRY-XXXX 

9 

;THIS PROGRAM WILL CORESIDE WITH ' BMON' 

f 

; DEFINE GLOBALS 



SNERR 

ENTRY 

CASON' 

READT 

BLINK 

START 

ENDAD 

READ2 

PAS51 

ASRIX 

ENTAD 

CASOF 

OPCRV 

GPOP 

IPFN 

REBAS 

LOAD 

FINDSC 



END 



EQU 
EOU 
EQU 
EQU 
EQU 
EQU 
EQU 
EOU 
EOU 
EQU 
EOU 
EQU 
EQU 
EOU 
EQU 
EOU 
EQU 
EQU 



ORG 

DEC 
LD 



1997H ;SN ERROR ENTRY 

031DH jJUNP TO ENTRY ON •/■ 

0212H ;TURN ON CASSETTE 

023SH ;READ BYTE FROM TAPE 

022CH ; BLINK ASTERIX 

41S2H ;TEMP STORE FOR START ADDRESS 

START+2 ; TEMP STORE FOR END ADDRESS 

0314H ;READ 2 BYTES FROM TAPE 

START+4 ;FLAG INDICATES FIRST BLOCK READ 

3C3EH 

40DFH ; ENTRY POINT ADDRESS 

01F8H ; TURNS CASSETTE OFF 

20FEH ; OUTPUT CR TO VIDEO 

032AH ; GENERAL PURPOSE O^P ROUTINE 

1BB3H ; INPUT FILE NAME 

06CCH ; REENTER BASIC 

41B8H ;LOAD COMMAND VECTOR 

0296H ;FIND SYNC 



79BDH ; BEFORE BMON 

HL ; CORRECT ENDAD POINTER 

( ENDAD ),HL; STORE END ADDRESS 
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78C1 

78C4 

70C7 

70CA 

70CO 

70D0 

70D3 

70D6 

70D7 

70DA 

70DB 

70DE 

70E1 

70E4 

70E7 

70E8 

70EB 

70EC 

70EF 

78F2 

70FS 

78F8 

70F9 

70FC 

70FD 

7100 



CD1403 

22DF40 

CDF801 

CDFE20 

21 £771 

CD0D71 

2A5241 

7C 

CDD171 

7D 

CDD171 

21EE71 

CDDD71 

2RS441 

7C 

CDD171 

7D 

CDD171 

21F671 

CDDD71 

2ADF48 

7C 

CDD171 

7D 

CDD171 

IS0E 



0083B 
00840 
008S0 
00860 
Q0870 



7102 018841 
7105 3EC3 

7107 02 

7108 DD211071 
710C DD228341 



7110 
7110 
7113 
7114 
7117 
711A 
711C 
711F 
7122 
7125 
7126 
7129 
712B 



71 2E 

712F 

7131 

7133 

7134 

713S 

7137 

713ft 

713B 

713C 

713E 

7140 

7142 

714S 

7147 



318842 

AF 

325641 

CDF E 20 

3E2A 

CD2A03 

CDB31B 

DflCC0B 

D7 

CA3719 

FE2F 

CAID03 



7E 

FE23 

2023 

23 

7E 

FE2D 

C29719 

23 

7E 

FE31 

2809 

FE32 

C29719 

1E10 

1802 



00890 

00900 

00910 

00920 

00930 

00940 

00950 

00960 

00970 

00980 

00990 

01000 

01010 

01020 

01030 

01040 

010S0 

01060 

01070 

01080 

01090 

01100 

01110 

01120 

01130 

01140 

011S0 

01180 

01170 

01180 

01190 

01200 

01210 

01220 

01230 

01240 

01250 

01260 

01270 

01280 

01230 

01300 

01310 

01320 

01330 

01340 

01350 

01360 

01370 

013B0 

01330 

01400 

01410 

01420 

01430 

01440 

01450 

01460 

01470 

01480 

01490 

01500 

01510 

01520 

81530 

01S40 

01SS0 

01568 



CALL 

LD 

CALL 

COLL 

LD 

CRLL 

LD 

LD 

CALL 

LD 

CALL 

LD 

CALL 

LD 

LD 

CALL 

LD 

CALL 

LD 

CALL 

LD 

LD 

CALL 

LD 

CALL 

JR 



READ2 ;READ ENTRY POINT FROM TAPE 

(ENTAD).HL: STORE ENTRY POINT 

CASOF ;TURN CASSETTE OFF 

OPCRU ;0/P CR LF TO UIDEO 

HL.MESG1; POINT TN START MESSAGE 

OPHES »©/P MESSAGE TO UIDEO 

HL,< START); POINT TO START ADDRESS 

A.H 

0P2AS ;0XP 2 ASCII CHAR TO UIDEO 

A.L 

0P2AS 

HL.MESG2; POINT TO END MESSAGE 

OPMES ;0'P MESSAGE TO UIDEO 

HL,<ENDAD)i POINT TO END ADDRESS 

A.H 

OP2AS ;0/P END H.O.A. 

A.L 

0P2AS ;O^P END L-O.A. 

HL.MESG3; POINT TO ENTRY MESSAGE 

OPMES ;O^P ENTRY MESSAGE 

HL.(ENTAD); POINT TO ENTRY ADDRESS 

A.H 

OP2AS ;0XP ENTRY H.O.fl. 

A.L 

0P2AS 

BEGIN 



;Q'P ENTRY L.O.A. 



;THE FOLLOWING SECTION OF THIS PROGRAM 
;WILL SETUP THE LOAD COMMAND UECTOR 



INIT LD BC.LOAD 

LD A.8C3H 

LD (BO, A 

LD IX. BEGIN 

LD (LOAD*l>,IX 



;MAINLINE PROGRAM 



JUMP INSTRUCTION 






; SETUP ENTRY POINT 



BEGIN EQU 
LD 
XOR 
LD 
CALL 
LD 

CALL 
CALL 
JP 
RST 
JP 
CP 
JP 
;THE FOLLOWING 
; SELECT LOGIC 

LD 

CP 

JR 

INC 

LD 

CP 

JP 

INC 

LD 

CP 

JR 

CP 

JP 

LD 

JR 



S ; PROGRAM ENTRY POINT 

SP.4288H; INITIALISE STACK 
R ; CLEAR A REG 

(PASSD.A; CLEARS PASSl FLAG 
OPCRU ;0/P CR LF TO UIDEO 

A.2AH ; ASCII UALUE FOR • 
GPOP ;O^P • TO UIDEO 

IPFN ; INPUT FILENRME FROM K'B 

C.REBRS :REENTER BASIC 

I8H iPOINT HL TO STRRT OF FILENAME 

Z, SNERR : SYNTAX ERROR 
2FH :TEST FOR / 

Z, ENTRY ;JUMP IF / 
SECTION IS THE! CASSETTE DRIUE 



A,(HL) ;TEST IF DRIUE SPECIFIED 

23H ; •? 

NZ.PRESEL 

HL 

A,(HL) DETERMINE REQUIRE DRIUE 

2DH ; -? 

NZ . SNERR 

HL 

A . ( HL ) 

31H ; DRIUE 17 

Z. SETUP 1 

32H ; DRIUE Z? 

NZ, SNERR 

E.10H ; DRIUE 2 MASK 

COMTST ;TEST , SWITCH 
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7149 1E00 
71 4B 23 
714C 7E 
714D FEZC 
714F C29719 

7152 78 

7153 23 

7154 1802 

71 55 3E00 
715S CD1202 



7158 CD3G02 



71SE CD35B2 



7161 

7163 

716S 

7167 

71G8 

7169 

716B 

716E 

716F 

7171 

7172 

7174 

7177 

717ft 

717C 

717F 

7181 

7183 

7186' 

7187 

718fl 
718B 
718C 
718F 
7181 
7193 
7196 
7198 
719B 
71 9E 
719F 
71ft0 
71fll 
71ft2 
71fl4 
71fi7 
71fi8 



FESS 

20F9 

0686 

7E 

B7 

2809 

CD3SB2 

BE 

20ED 

23 

10F3 

CD2CB2 

CD3582 

FE78 

CHBD70 

FE3C 

20F4 

CD3502 

47 

CD14B3 

85 

4F 

3ftS641 

FE00 

2008 

225241 

3EFF 

325641 

CD3502 

77 

23 

81 

4F 

10F7 

CD3502 

B8 

28Cft 



71ftft 3E43 
71flC 323E3C 
71 BF 18C6 



01570 

01S80 

01580 

01600 

01610 

01620 

01630 

01640 

01650 

01660 

81670 

01688 

01690 

01700 

01710 

01720 

81730 

01740 

01750 

01760 

01770 

01780 

01790 

01800 

01810 

01820 

01830 

01840 

01850 

01860 

01870 

01 880 

01890 

01900 

01910 

01920 

01930 

01940 

01950 

01960 

01970 

01980 

01990 

02000 

02010 

02028 

02030 

02040 

020S0 

02060 

02070 

02080 

02090 

02100 

02110 

82120 

02130 

02148 

02150 

02160 

02170 

02190 

02190 

ZZZW 

02210 

02220 

02230 

02240 

022S0 

82268 

02270 

02280 



SETUP1 LD E,0 ; DRIVE 1 MASK 

COtlTST IMC HL 

LD ft.(HL) 

CP 2CH ;,? 

JP NZ.SNERR 

LD fi.E j RECOVER MASK 

INC HL 

JR SELCftS 

PRESEL LD ft.B : DRIVE 1 MASK 

SELCftS CfiLL CflSON ;CASON TURNS ON THE 

;CftSSETE DRIVE SELECTED. 

CfiLL FINDSC :THIS ROUTINE 

;SEfiCHES THE TftPE UNTIL THE SYNC 
:PULSE IS FOUND. IT THEN PUTS TWO fiSTERIX IN 
;THE TOP RIGHT HfiND CORNER OF THE SCREEN 

■ 

NOSYNC CfiLL REfiOT ; READS fl BYTE FROM 

; TftPE AND RETURNS WITH THE BYTE IN THE ft REG 
;NO OTHER REGISTERS ARE AFFECTED. 



TSTFN 



CP 
JR 
LD 
LD 



JR 

CALL 



NAMOK 
NOCODE 



JR 

INC 

DJNZ 

CALL 

CALL 

Z 

JP 

CP 

JR 

CALL 

LD 

CALL 



5SH ;TEST FOR SYNC 

NZ, NOSYNC: JUMP IF NO SYNC 

B,6 ; LENGTH OF FILE NAME 

A,(HL> 

A 

Z.NflMOK ;JUMP IF NAME MATCH 

REftDT ll/P NEXT FILENAME CHAR 

<KL) ; COMPARE FILENAMES 

N2, NOSYNC; NO MftTCH 

HL : POINT TO NEXT CHAR 

TSTFN :DONE ALL SIX? 

BLINK ; BLINK flSTERIX 

READT [t/P NEXT BYTE 

78H ;END OF BLOCK? 

Z.END ;LOftD COMPLETE 

3CH ; START OF BLOCK? 

NZ, NOCODE; WAIT FOR CODE 



READT 

B.A 

READ2 



; I^P BLOCK 
; STORE B'L 
; I--P START 



LENGTH 
IN "B" 

ADDRESS 



I CHECKSUM CORRELATION BEGINS AT THIS POINT 



ADD 
LD 
LD 
CP 
JR 
LD 
LD 
LD 
NOT1 CALL 

LD 
INC 
ADD 
LD 
DJNZ 
CALL 
CP 
JR 
; IN THE EVENT 
; CONTINUES 
LD 
LD 
JR 



A,L ; UPDATE CHECKSUM 

C,A ; CHECKSUM IN "C" 

ft, (PASS!) : START OF PROGRAM 

J PASS 1? 

NZ.NOT1 ;IF NOT 

( START), HL: STORE START ADD 

A.8FFH 

(PASSD.A; SET PASS 1 FLAG 

READT ; IsP BYTE 

(HL).A ;0/-P BYTE TO MEMORY 

HL ; UPDATE MEMORY POINTER 

ft.C 

C.fl 

NOT1 

REftDT 

C 

Z.NAMOK 



; UPDATE CHECKSUM 
;LOOP TILL E.O.R. 
; ixp TAPE CHECKSUM 
; COMPARE CHECKSUMS 
;TEST FOR E.O.F. 



OF INCORRECT CHECKSUM THE PROGRAM 



A.43H ;ASCII C 
(ASRIX>,A; O/P C 

NOCODE 



TO VIDEO 



SUBROUTINES USED BY SYSCPY 



SUBROUTINE HX2RS 
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71B1 

71 B2 

71B4 

71B7 

71 B8 

7189 

71BB 

71BD 

71 BF 

71C1 

71C3 

71CB 

71C7 



47 

E60F 

CDC871 

4F 

78 

E6F0 

CB3F 

CB3F 

CB3F 

CB3F 

CDCB7I 

47 

C9 



71CB FE0A 
71CA 3802 
71CC CE07 
7 ICE CG30 
7100 C9 



71D1 CD8171 
71D4 78 
7 IDS CD2A03 
71 D8 79 
71D9 CD2A03 
7 IDC C9 



71 DD 7E 
7 IDE FE04 
71E0 C8 
71E1 CD2A03 
71E4 23 
71E5 18F6 



71E7 S3 
71ED 04 
71EE 20 
71FS 04 
71F6 20 
71FF 04 



7102 

00000 TOTAL 



0Z290 
02300 
02310 
02320 
02330 
02340 
02350 
023S0 
02378 
02380 
02390 
02400 
02410 
02420 
02430 
02440 
02450 
02460 
02470 
02480 
02490 
02500 
02510 
02520 
02530 
02540 
02550 
02550 
02570 
02580 
02590 
02600 
02610 
02620 
02630 
02640 
02550 
02660 
02670 
02680 
02690 
02700 
02710 
02720 
02730 
02740 
02750 
02760 
02770 
02780 
02790 
02800 
02810 
02920 
02830 
02840 
02850 
02860 
02870 
02880 
02890 
02900 
02910 
02920 
02930 
02940 
02950 
02960 
02970 
02980 
02990 
03000 
ERRORS 



:CONUERTS THE HEX VALUE IN THE A REGISTER 
;INTO TWO ASCII CHARACTERS WHICH ARE STORED 
;IM THE BC REG PAIR 



HXZflS 



LD 


B.A 


AND 


0FH 


CALL 


CONAS 


LD 


C,A 


LD 


A,B 


AND 


0F0H 


SRL 


A 


SRL 


A 


SRL 


A 


SRL 


A 


CALL 


CONAS 


LD 


8, A 


RET 





SAVE HEX CHARACTER 

ISOLATE 4 LSB 

CONVERT A REG TO ASCII 



; ISOLATE 4 MSB 



;MOVE TO 4 LSB 



; SUBROUTINE CONAS 

P 

;CONUERTS THE A REGISTER CONTENTS FROM 0-F 
J INTO AN ASCII CHARACTER 



CONAS 

ADJAL 
! 



CP 

JR 

ADD 

ADD 

RET 



0AH 

C, ADJAL 
A. 7 
A.30H 



;CAPRY CLEAR IF A REG>»0A 
;ADJUST ALPHABETIC CHARACTERS 

; CONVERT TO ASCII 



SUBROUTINE 0P2AS 



'.OUTPUT 2 ASCII CHARACTERS IN THE BC REGISTER PAIR 
;TO THE O/P DEVICE USING GPOP ROUTINE 



0P2AS 



CALL 

LD 

CALL 

LD 

CALL 

RET 



HX2AS 

A.B 

GPOP 

A.C 

GPOP 



:Q'P TO DEVICE 



;0--P TO DEVICE 



; SUBROUTINE OPMES 

S 

;OUTPUTS ASCII MESSAGE POINTED TO BY THE HL REGISTER 
;PAIR USING GPOP. THE ASCII MESSAGE MUST BE TERMINATED 
;WITH 04 (E.O.T. >. 



OPMES 



LD 


A.(HL) 


1 INPUT CHARACTER 


CP 


4 


iE.O.T.7 


RET 


2 I 


(MESSAGE COMPLETE 


CALL 


GPOP 


,0/P CHARACTER 


INC 


HL i 


! UPDATE MESSAGE POINTER 


JR 


OPMES 





MESSAGES FOR OUTPUT 



MESG1 

MESG2 

MESG3 
FINSH 



DEFM 
DEFB 
DEFM 
DEFB 
DEFM 
DEFB 



END 



START-' 



END-' 



ENTRY-' 



INIT 



; DEFINE ENTRY 
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Next month's issue will 
news, letters, etc.. 



««•«« 



*■**• 



NEXT MONTH'S ISSUE 
contain at least the following programs 



plus the usual features, articles, 



FIGHTER SQUADRON (LI) 

Would you like to be a squadron leader and 
destroy Gestapo Headquarters, all you have to 
do is wait till next month. 



FOOD REQUIREMENTS (LI) 

Eating too much, too little, 

know. Next month you'll be able 



or don't you 
to find out. 



LOWER CASE DRIVER (L2 ml.) 

This machine language program wil 

to display lower case letters on 

in 8ASIC programs, if you have 

modification fitted as described in MICRO-80 

Issue 5, April 1980. 



I allow you 
your screen 
Lower Case 



DRAW !I (L1I/4K) 

This program is for our more artistic readers, 
it lets you sKetch on the screen, make a 
negative of your sKetch, save it on tape, load 
it from tape and lots more. 

BLEEPER (LII/4K) 

A little beauty this one, makes your '80 bleep 
every time a key is pressed, not only that but 
pressing "ENTER" or "BREAK" makes a different 
bleep. It's got a keyboard debounce routine 
built in as well. 



FLASHING CURSOR (L2 ml. & BASIC) 
A flashing cursor program that really works!! 
Written by Eddy Paay, this program works with 
both LI I and Disk BASICS. The second program, 
in BASIC, allows you to adjust the size/shape 
of the cursor and its rate of flashing so that 
you can, if you wish, have a transparent 
cursor. The ml. program demonstrates how to 
use a ROM routine to reset MEMORY SIZE from 
within your own program. 
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A SPECIAL OFFER! 



TO 
SUBSCRIBERS OF 




■ electronics 




FOR THE FIRST TIME IN AUSTRALIA! 
GENUINE TANDY TRS-80 MICRO-COMPUTERS, 

HARDWARE AND SOFTWARE AT 

GREAT DISCOUNT PRICES ! ! ! 

HOW TO ORDER - 

1. SELECT ITEMS FROM 1980 TANDY CATALOGUE 

2. DEDUCT 10% FROM ADVERTISED PRICES 

3. POST US YOUR ORDER STATING DESCRIPTION 
CAT. No AND A CHEQUE OR MONEY ORDER. 

WE WILL - 

1. ATTEND TO YOUR ORDER WITHIN 7 DAYS 

2. SUPPLY GOODS SELECTED FREIGHT FREE ! 

3. SEND ADVERTISING REGULARLY TO KEEP 
YOU INFORMED OF CURRENT SPECIALS ! 

* subject to availability 



to CONQUEST ELECTRONICS Pt y . lw. 
212 Katoomba St, KAT0QM8A 2780 



Please supply - 
_QTy. CATHQ OESC, 



ADV. PRICE 



SUB TOTAL 
LESS 10* 
FIND CHEQUE FOR TOTAL 




SEND FREIGHT FREE TO 

"AM6,... .... .. i ... - — . 

ADORE SS * 

P/ Code 



CONQUEST ELECTRONICS 



PTY. LTD. 



212 KATOOMBA ST KATOOMBA N.S.W. 2780 PHONE (047) 82 2491 
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LEVEL II RO 
REFERENCE MANUAL 

by Edwin Paay 
Published by MICRO-80 PRODUCTS 

Written by Eddy Paay. the LEVEL II ROM REFERENCE MANUAL is the most 
complete explanation ot the Level II BASIC interpreter ever published. 

Part 1 lists all the useful and usable ROM routines, describes their (unctions 
explains how to use ti n your own machine language programs and notes I 

effect ot each on the various Z 80 registers. 

Part 1 also details the contents of system RAM and shows you how to intercept 
BASIC routines as they pass through system RAM. With this knowledge, you can 
add your own commands to BASIC, for instance, or position BASIC programs in 
high merrn the only restriction is your own imagination! 

Part 2 gives detailed explanations ot the processes used for arithmetical 

ulations, logical operations, data movements, etc. Italsodescribesthevarn 
formats used for BASIC, SYSTEM and EDITOR/ASSEMBLER tapes Each section 
is illustrated by sample programs which show you how you can use the ROM 
routines to speed up your machine Ian3uage programs and reduce the amount of 
code you need to write 

The LEVEL II ROM REFERENCE MANUAL Is Intended to be used by machine 
language programmers it assumes a basic understanding of the Z 80 Instruction 
sel and some experience o' Assembly Language programming. But BASIC 
programmers too will benefit Irom reading it. They will gain a much better insight 
into the functioning of the interpreter which should help them to write faster, more 

concise BASIC programs 



MICRO-80 



